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tssy  Working™  is  a  line  of  high  qualit)-,  low  cost  personal  productivity  prog^jms 
designed  for  tlie  person  v,im  wants  to  i^md  time  doing  usellil  work,  not  smiling 
with  complex  computer  commands  and  long  manuals.  Each  Kasy  Working  pnxluct  is 
carefully  designed  to  work  alone  or  in  combination  witli  other  members  of  the  Easy 
Working  femily. 

On-screen  menus  provide  "at-a-^ance"  summaries  of  the  features  of  the  prt»gram. 
When  you  select  a  feature  from  the  menu  b:ir.  a  menu  drops  do\vn  to  show  all  of  the 
available  options.  EvcTy  command  a^ailAle  is  di^plaj'ed  in  the  drop-down  menu.  You 
will  find  diat  you  will  sptsid  less  time  getting  to  know  the  program  and  more  time  (»i 
your  projects.  And  since  each  member  of  the  Eas\'  Woridng  liimily  uses  the  same 
command  structure,  once  you  learn  how  to  use  one,  you'll  iind  a  head  stait  on  learning 
to  use  the  other  two.  But  don't  be  ft)oIcd.  Easy  doesn't  mean  incomplete.  Easy  Working 
products  are  Ml-featured. 

Easy  Working '" :  TTje  Writer '" : 

Complete  word  processing  features  allow  you  to  create  your  letters  and  reports  and 
arrange  them  to  suit  your  needs,  includes  1(X),0(X)  word  spellchecker.  Editing 
fiinctioas  include  insert,  delete,  cut,  paste,  and  copy. 

EasyWorking'MheFUer™: 

A  multi-purpose  program  which  simplifies  tlie  stor^e,  selection,  and  reporting  of 
information.  Maintain  or  create  mailing  lists,  inventories,  club  memberships,  and  other 
types  of  information. 

Easy  Working  " :  The  Planner'" ; 

Ihe  Planner  provides  you  witii  all  of  the  proftssional  features  (rfan  electronic  spread- 
sheet Extcasive  mathematical  operations  easily  create  your  spreadsheet  for  budgeting 
ta.x  calculation,  expense  reports,  financial  statements,  and  other  applicatioas. 


The  Writer,  Tlie  Filer,  and  The  Planner  ftilly 
int^rate  with  each  other. 


Arailable  at  line  software  dealers  or  (br 
ordei?  only  call: 


1-800-826-0706 

Otlierscall;(6!7)l94-120() 


Apple  n+,ne,nc  0.95 

Coitimodore  64/128  $9.95 

IBM/PC/AT  $9.95 


A 


SPffirMKS'i^ 


spinnaker  Software,  Corp.,  One  Kendall  Square,  Cambridge,  .MA  02 1 39 


THE  TOUCH 

OF  A  PIANO, 

THE  SOUNDS  OF 

16  INSTRUMENTS, 

THE  MIND 
OF  A  COMPUTER 


Pull  up  a  bench  and  sit  down. 

To  our  extraordinary  Yamaha 
Clavinova"  CVP-series  digital 
keyboards. 

Encased  in  handsome,  com- 
pact cabinets,  they  house  a  host 
of  features  just  waiting  to  bring 
out  the  musician  in  you. 

An  88-key,  touch-sensitive 
keyboard  that  never,  ever  needs 
tuning. 

Sixteen  rhythm  patterns  and 
16  instrument  sounds  on  our 
CVP-8  and  10.  Including  flute, 
trumpet,  vibes,  drums. 

Plus  the  full,  rich  sound  of 
a  concert  grand  piano,  made 


stunningly  realistic  through  our 
exclusive  AWM  technology. 

You'll  also  find  MIDI 
compatibility. 

Record  and 
playback  on  our 
CVP-8  and  10. 

Guide  lamps  to 
patiently  lead  you. 

Optional  head- 
phones for  apart- 
ments or  late  nights. 

And  prices  start- 
ing at  about  the 
price  of  an  upright. 

So  stop  by  your 
"Vamaha  dealer  today 


You'll  find  the  Clavinova  key- 
board a  masterwork  of  musical 
genius  it  doesn't  take  a  genius  to 
master. 


FREE  DEMOTAPE 

R>T  a  free  demo  casseile  of  our  Cluvinova  keyboards, 
return  [hi.s  coupon,  or  call  us  on  our  toll-frue  WK)  number. 
1-800-453 -WWO 

Name 
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YAMAHA  MUSLC 

CORPORATION,  USA 

1^0.  Bm  28570 

Sania  Ana,  CA  92799-8570 

CI 


©YAMAHA* 

Into  the  future," 

f,  ly^H.  Yamaha  Music  Corporaiion,  L'S,-\ 
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THEF-16 

FIGHTER  SIMULATION 

Climb  into  itie  FALCON  cockpil  and  fly  a 
highly  realistic  stmulaliDn  of  ihc  F-  16A 
Fightmg  Falcon.  Pefform  fighler  maneu- 
vers while  enpfjinfj  enemy  MiG's  m 
dogiight  baules  OR  connect  two  com- 
puiers  and  go  head-to-head  against 
another  plane  piloted  by  a  second 
person.  Realism  is  captured  by  use 
of  sound  and  digitized  airplane  images, 
advanced  radar  mechanisms,  and  four 
alternating  heads-up-displays.  Muhiple 
levels  and  missions  challenge  even 
expert  pilots.  Feel  the  exhilaration  of 
power,  speed,  and  maneuverability 
of  the  F-16  as  you  claim  the  skies 
as  FALCON  terriiory! 


I^ALCON  Auailabit  on  Madnlosh  S12K  in/lacinliish  Plus 
camp3lible)andlBM256K. 


Specirum 
HohBytebic: 

2061  CHALLENGER  DRIVE         ! 
ALftMEDA,  CA  94501   (415)522-35B4 


V>iii©t^,- 


Macintosh  version 


FALCON  is  i  irsdemark  of  Specirum  HoloBvIe  Inc. 
MacintD&h  is  a  irsdemarlc  licensed  id  Apple  Compuler,  Inc. 
IBM  IS  a  [epistered  irademark  ol  Intemalional  Btjsineis 
Machines  Corp 
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Editor's  Notes 


The  dramatic  evolution  thus  far  in  the 
life  of  the  personal  computer  industry 
will  be  historically  regarded  as  a  unique 
phenomenon:  Never  have  so  many  fun- 
damental changes  occurred  so  rapidly, 
and  in  an  industry  that  virtually  didn't 
exist  a  dozen  years  ago. 

To  get  a  sense  of  this  startling  evo- 
lution, look  back  only  six  years  to  the 
state  of  personal  computer  technology 
and  compare  it  viJith  today's.  In  terms  of 
speed,  memory,  graphics,  and  almost 
all  other  hardware  criteria,  the  comput- 
ers of  1988  are  several  orders  of  magni- 
tude beyond  what  was  then  available. 
In  software,  the  same  dramatic  changes 
have  occurred.  Look  at  some  of  the  first 
commercially  successful  programs  writ- 
ten for  the  Apple  II  or  Commodore  64, 
and  compare  them  with  almost  any 
from  the  current  stock.  Or  look  at  the 
changes  in  telecommunications,  dis- 
play monitors,  and  data  storage  de- 
vices. The  differences  are  dramatic. 

There's  no  better  place  to  gain  an 
understanding  of  just  how  great  those 
changes  have  been  than  in  the  pages  of 
the  leading  computer  magazines.  Since 
1979,  COMPUTE  Magazine  has  had  a 
front  row  seat  at  this  spectacle.  Our  goal 
(and  our  delight)  continues  to  be  in 
following  the  continually  evolving  per- 
sonal computer  market  to  see  where  it's 
headed  and  to  join  with  our  readers  in 
trying  to  understand  how  best  to  use 
this  amazing  technology.  (For  example, 
to  see  what  was  on  our  readers'  minds 
in  the  early  1980's,  see  "Our  Back 
Pages"  on  page  12.) 

Despite  the  popularity  of  our  ma- 
chine-specific magazines — COMPUTEi's 
Gazette  for  Commodore  64  and  128, 
COMPUTEI's  PC  Magazine  for  IBM  and 
compatibles,  COMPUTEI's  Apple  Applica- 
tions for  Apple  II  and  Macintosh,  and 
COMPUTEI's  Atari  ST  Disk  &.  Magazine— 
we're  convinced  that  there  continues  to 
be  an  important  place  for  a  wide-ranging 
horizontal  computer  magazine  that 
brings  to  computer  users  the  best  in 
news,  reviews,  in-depth  features,  and 
hands-on  tutorials.  One  of  the  hall- 
marks of  COMPUTEI's  success  has  been 
its  ability  to  evolve  along  with  the  in- 
dustry. And  we're  pleased  to  say  that 
this  is  just  what  we're  doing  again. 

Beginning  next  month,  COMPUTE! 


will  have  an  exciting  new  design,  new 
columns,  and  a  different  approach  to 
features  and  product  reviews.  Taking 
the  helm  as  editor  will  be  Gregg  Keizer, 
who  has  been  with  COMPUTE!  Public 
cations  for  nearly  five  years  and  re- 
mains as  editor  of  Apple  Applications. 
I'll  be  staying  on  as  editor  of  Gazette  and 
will  increase  my  involvement  with  our 
PC  magazine. 

COMPUTEI's  new  look  will  show- 
case some  of  the  best  and  most  knowl- 
edgeable writers  and  columnists  in  the 
computer  industry.  These  writers  and 
the  experienced  staff  here  at  COM- 
PUTE! Publications  are  expanding  the 
number  and  scope  of  our  feature  arti- 
cles to  take  on  a  variety  of  the  most 
important  topics  each  month.  We'll 
show  you  what  you  can  do  with  your 
computer  now,  and  what  you  can  ex- 
pect from  it  in  the  future. 

Our  new  columns,  by  such  popular 
writers  as  educator  and  software  devel- 
oper David  Thornburg  and  renowned 
science  fiction  writer  Orson  Scott  Card, 
will  give  you  insights  on  everything 
from  industry  trends  to  the  latest  and 
greatest  entertainment  software. 

More  product  reviews  in  next 
month's  COMPUTE!  means  more  infor- 
mation for  you,  and  more  informed  buy- 
ing decisions.  Our  reviewers  will 
examine  the  most  promising  software  in 
the  entertainment,  education,  home 
productivity,  professional,  and  small 
business  arenas.  And  we'll  look  at  hard- 
ware— new  computers,  printers,  disk 
drives,  add-on  cards,  and  the  like — for 
the  first  time  on  a  regular  basis. 

Even  though  COMPUTE!  is  written 
for  all  computer  owners,  no  matter 
what  system  they  may  own,  we'll  con- 
tinue to  provide  the  hottest  machine- 
specific  information  in  a  new 
department — COMPUTE!  Specific. 

If  you  care  about  what  you  can  do 
with  your  computer,  if  you  want  to 
know  how  what's  happening  in  the  in- 
dustry affects  you,  if  you  want  the  latest 
information  about  emerging  trends  like 
desktop  video,  CD-ROM,  second-gener- 
ation paint  programs,  and  more,  then 
you're  going  to  like  the  new  COMPUTE!. 

Look  for  us  next  month.  You'll  be 
glad  you  did. 

Lance  Elko,  Editor 


COMPUTE! 

TK*  L*Odlng  Mogatin*  CM  Hoitm,  Educational,  And  t*cr*oHonol  Computing 


Edftor 

Art  Director 

Features  Editor 

Programming  Supervisor 

Assistant  Editors 


Assistant  Technical  Editor 

Assistant  Features  Editor 

Editorial  Programmers 

Assistant  Editor, 

Submissions  &  Disk  Products 

Contributing  Editors 


Edriorial  Assistant 
Programming  Assistants 


Lance  Elko 
Janice  R.  Fary 
Kerth  Ferrell 
Patrick  Panrish 
Rhett  Anderson 
Clifton  Karnes 
Randy  Thompson 
Jim  Fuchs 
Tom  Netsel 
William  Chin 
George  Miller 

David  Hensley 
Jim  Butte rfield 

(Toronto,  Canada) 
Fred  D'lgrtazio 
(E-  Lansing.  Wl) 
David  Thornburg 
(Los  Altos.  CA) 
Bill  Wilkinson 
(San  Jose.  CA) 
Mickey  McLean 
Joyce  Sides 
Troy  Tjcker 


ART  DEPARTMENT 

Associate  Art  Director   Lee  Noel,  Jr, 
Mechanical  Artists   Scotty  Billings 
Robin  Case 
Kim  Potts 

PRODUCTION 
DEPARTMENT 
Production  Director  Tony  Roberts 
Production  Manager   Irma  Swain 
Assistant  Production  Manager   De  Potter 

Copy  Edrtors  Jill  Champion 
Karen  Siepak 
Lori  Sonoski 
Karen  Uhlendort 
Typesetting   Carole  Duiiton 

COMPUTE!  PUBLICATIONS 
Group  Vfce-Preskdent. 
Publtsher/Editonal  Director   William  Tynan 

Managing  Editor  Kathleen  Martinek 
Associate  PutMfsher  Seiby  Bateman 
Editor.  COMPUTE!  Books   Stephen  Levy 
Adoiinistrative  Staff   Sybil  Agee 

Anrta  Armtield 
Iris  Brooks 
Julia  Fleming 

ABC  CONSUMER 

MAGAZINES 

Senior  Vica-Preswjent. 

Advertising   Richard  J.  Marino 
Group  V»M-P;esK:lent. 

Circulation   Barbara  H,  Marks 
Vice-PresKient. 

Operations   Lucjan  A,  Parziale 
Vice-President.  Finance   Marc  Reisch 
Vice-President.  Prodjction   llene  Berson-Weiner 

CIRCULATION 
DEPARTMENT 
Vice-President.  Circulation   Robert  I.  Guraha 
Circulation  Subscnption  Staff   Ora  Blackman-DeBrown 
Joseph  DeFaIco 
Mitch  Frank 
Tom  Link 
James  J.  Smith 
Customer  Service   Kay  Harris 
Single  Copy  Sales  A.  Heather  Wood 

Oneofthej^SCPlBUSHlNC  ^Convantes 

President    Robert  G.  Burton 

1330  Avenue  of  the  Americas 

New  York.  NY  1 001 9 

ADVERTISING  OFFICES 

Nbw  York:  ABC  Consumer  Magannes.  Inc  .  B25  Severih  At.*.,  New 

York.  NY  ^0019  Tel.  (212)  ?65-B360.  Peter  T,  Johnsnwyet.  Group 

Aja*er|]Sif>9  Difecior,  Bernard  J  TlTeottakl,  Jr..  Adv«rijsing  DiFecttx 

QraAntborp:  COMPUTE'  PuWicatiorfs.  Surle  21».  324  We^t  WorxJovef 

Ave  .  G'oefislDoro,  NC  274ra.  Tel.  [91 9J  275-9809,  Kathleon  lAgram. 

Adwenising  Pfoduc!ion  Cocrdjnaiw 

N«w  England  &  Mkl-Atljinttc:  Bernard  J.  Theobald.  Jr..  [212|  315-1665. 

Pete!  Hardy  (617)  B81  9O00- 

MidWBS(  &  SoutJiweat  Jerry  Thompson,  Lucille  Dennis  (312)  726-6M7 

[Chicago):  17131  731-2605  [Te^as]:  (303)  595-9299  [CoJoradoj;  (415} 

346-6222  [CaMornia] 

West,  Nonhweflt,  &  British  Columbia-  Jeiry  Thompson,  Lucille  Donris 

(4t5!34e-a2?3 

Southeart  &  Inlernationat  Peier  Hardy  [617)  5S1-9000 

Earorial  «nqijif«s  anould  Qe  addressed  lo  The  Edrlor.  COMPUTE', 
Suns  200.  324  West  Wendover  Awe.,  ■Qj-eensboro.  NC  27408 

PRJNTED  IN  THE  U.S.A.  ^^ 


The  personal  computer 
built  to  go  home,  too. 


The  IBM-compatible  Laser  Compact  XT  Is 
powerful  enough  for  the  office  and  easy 
enough  to  use  at  home. 

Most  people  take  work  home  to  keep  ahead  of  their 
competition.  The  Laser  Compact  XT  has  the  speed 
(10  MHz)  and  memory  (512K  expandable  up  to  1.640K 
bytes)  to  handle  IBM-compatible  software  from 
Lotus  1,2,3*  to  games,  and  beyond.  Its  compact 
design  with  built-in  handle  makes  it  easy  to  carry  home. 

The  Laser  Compact  XT  has  a  built-in  disk  drive, 
serial,  parallel,  joystick,  mouse  and  modem  interfaces 
to  hook  up  all  your  peripherals.  The  Compact  XT  gives 
you  the  choice  of  working  with  either  a  monochrome 


or  color  monitor  (CGA  and  Hercules*),  and  the  XTE 
model  is  EGA  compatible. 

The  Laser  Compact  XT  combines  performance  and 
speed  with  a  price  that's  easy  to  handle  at  under  $600. 
For  more  information  on  the  Laser  Compact  XT  and  the 
name  of  your  nearest  dealer,  contact  Video  Technology 
Computers,  Inc.,  400  Anthony  Trail,  Northbrook,  IL 
60062,  or  call  (312)  272-6760, 
In  Canada,  call  (604)  ^^mi- 

273-2828.  ^i^?^^ 


fWLASERCOMRACTXT 


LjMfOonvacrlCTitaVtdtmirtiO'VMtM'bCifinoiD^CQ'mjlE^  tnc  IBV.PC  XTandCQAirDreyisIiHwd 
uadBfTwlaorirMmBUoaalBuiinauUacflinesCO'p  Lotus  an^  1,2  3  »c  regaled  lEKMrrnoAiaiLMut 
D«v«topfTWftiCo>p.He<CLH«stsaie^&TedtraiieiTd!^i>IHe!'Oitts.inc     ciee^.vOoo'bchrKyofivCompLlifa,  inc 


Manufactured  by 

VIDEO  TECHNOLOGY  COMPUTERS,  INC. 


MAKING  COMPUTERS  AFFORDABLE 


COMPUTERS  WIN 


Computer  owners  emerged  as  big 
winners  in  Las  Vegas  this  past  Janu- 
ary, judging  by  the  products  on  dis- 
play at  the  Winter  Consumer  Elec- 
tronics Show, 

On  both  the  hardware  and 
software  fronts,  increasing  sophisti- 
cation and  user  friendliness  were 
much  in  evidence.  It  is  clear  that  a 
third  generation  of  microcomputer 
hardware,  with  software  to  match, 
is  being  unleashed.  Hardware  pow- 
er continues  to  climb.  Consumer 
software  is  truly  coming  of  age, 
demonstrating  heightened  play- 
ability  on  the  entertainment  side, 
vastly  increased  performance  on 
the  productivity  side,  innovation  on 
all  sides. 

Computerized  Hot  Spot 

While  some  of  the  traditional 
areas  of  consumer  electronic 
strength — VCRs,  for  example — 
showed  signs  of  slippage  and  satura- 
tion ("How,"  one  dealer  was  over- 
heard saying,  "do  you  sell  that  third 
VCR  into  a  household?"),  computers 
and  software  remained  a  CES  hot 
spot.  More  than  a  few  observers  ex- 
pressed confidence  that  the  emer- 
gence of  a  large  home  computer 
market  is  just  beginning  to  take 
place. 

Consumer  software  publishers 
and  compatibles  manufacturers  are 
going  after  that  market  in  a  big  way, 
enthusiastic  despite  a  resurgent 
videogame  industry  and  the  possi- 
bility of  economic  downturn. 

There  was  a  sense  of  a  vast,  as 
yet  untapped,  market  on  the  brink 


It  was  quite  a  show!  The  Winter  Consumer 
Electronics  Show  this  past  January  marked 
an  important  turning  point  for  the  com- 
puter/ software  industry.  There  were  more 
consumer  products  than  ever  before— so 
many  that  we  couldn't  mention  all  of  them 
in  this  article— and  the  products  reflected  a 
new  spirit  of  adventure  and  growth,  exem- 
plars of  an  industry  that  is  becoming  a  full- 
fledged  member  of  both  consumer 
electronics  and  the  media  establishment. 
After  a  couple  of  slow  seasons,  home 
computing  is  back  with  a  vengeance— and 
this  time,  many  feel,  it's  here  to  stay. 


of  waking  up.  It's  a  new  market 
(the  millions  of  first-time  com- 
puter buyers),  but  one  increasing- 
ly comfortable  with  computers. 
From  VCRs  to  automobiles  to 
kitchen  appliances,  consumers  are 
accustomed  to  programmable  ap- 
pliances, electronic  displays. 

It's  a  market  whose  children 
have  lived  with  microcomputers 
all  their  lives,  for  whom  a  com- 
puter is  something  that's  not  in 
the  house  yet,  not  something  that 
never  will  be.  The  home  computer 
industry  is  ready  to  break  out, 
bringing  new  products,  new 
prices,  and  new  directions.  Here's 
an  overview  of  some  of  the  prod- 
ucts on  display  at  CES. 

Hardware 

The   overwhelming  majority 

of  machines  on  display  were 
IBM  compatibles.  Commodore  and 
Atari  passed  on  appearing  at  CES, 
while  IBM  and  Apple  have  never 
been  present  at  the  show. 

That  left  the  field  open  to  the 
compatibles  manufacturers,  most  of 
whom  stressed  the  growing  size 
and  importance  of  the  home  office 
market,  although  an  increased 
awareness  of  the  consumer  market 
was  also  evident. 

Amstrad  continued  to  press  its 
menu  of  configurations,  offering 
consumers  their  choice  of  bundled 
software.  Purchasers  may  choose 
either  Migent's  Ability,  an  integrat- 
ed package,  or  Amstrad's  propri- 
etary Discover  Kit,  developed  by 
Learning  Technologies,  which  in- 


Keith  Ferrell,  Features  Editor 
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dudes  applications  software  as  well 
as  product  samples  from  leading 
software  publishers.  The  software 
bundles  accompany  the  PC  1512, 
Amstrad's  desktop  computer,  or  the 
company's  new  entry,  the  PPC  512, 
a  portable  computer.  The  PPC  512 
can  be  run  on  AC,  an  automobile 
cigarette  lighter,  or  regular  "C"  bat- 
teries. The  512K  portable  is  avail- 
able for  $949  (single  SVa-inch  drive) 
or  $1,049  (dual  SVi-inch  drives). 

Blue  Chip  president  John  Rossi 
sponsored  a  press  breakfast  featur- 
ing a  speech  by  Julian  Cohen,  head 
of  the  American  Home  Business 
Association.  Cohen  stressed  the 
size  and  untapped  market  potential 
of  the  home  office  market,  citing 
figures  that  show  more  than  13  mil- 
lion home  offices,  with  an  average 
annual  income  of  over  $50,000. 
Blue  Chip  is  addressing  that  market 
aggressively  vnth  an  expanded  IBM- 
compatible  product  line  including 
an  AT  (the  pcPopular  AT,  640K 
RAM,  one  1 .2-megabyte  floppy  disk 
drive,  priced  at  $1,499)  and  an  XT 
(the  pcPopular  XT,  512K  RAM,  one 
floppy  disk  drive,  and  a  20-mega- 
byte  hard  disk,  priced  at  $1,199).  For 
mobile  users.  Blue  Chip  introduced 
the  MasterPC  Portable,  a  19-pound 
portable  AT  offering  1MB  of  memo- 
ry, a  supertwist  backlit  screen,  and 
an  80286  central  processor. 

Vendex  continued  and  extend- 
ed its  HeadStart  campaign,  pro- 
claiming its  PC,  with  bundled 
software  and  DOS  tutorial/inter- 
face, the  easiest  of  all  for  the  first- 
time  buyer,  with  features 
appreciated  by  power  users.  Much 
present  was  Vendex  spokesman, 
wrestler  King  Kong  Bundy.  Confi- 
dent that  first-time  buyers  will 
quickly  become  power  users,  Ven- 
dex used  CES  as  a  showplace  for  its 
line  of  "Easy  Does  It"  peripherals. 


including  a  21 -megabyte  hard  disk 
($599)  and  a  Memory  Upgrade  kit 
($99.95),  which  lets  users  boost 
RAM  from  512K  to  748K.  Also  mak- 
ing its  debut  at  CES  was  the  Head- 
Start  Mouse,  produced  for  Vendex 
by  Logitech  and  priced  at  $99.95.  It 
comes  bundled  with  Logitech's 
Paint  Show  graphics  package. 

Laser  (Video  Technologies) 
used  CES  to  remind  attendees  that 
not  all  the  compatibles  manufactur- 
ers were  restricted  to  the  IBM  market. 
At  CES,  the  company  introduced  a 
variety  of  machines  in  its  successful 
line  of  both  Apple  and  IBM  compa- 
tibles. On  the  Apple  front.  Laser 
showed  its  new  Laser  128  EX 
($579.95),  boasting  faster  process- 
ing speed  than  the  Apple  H,  memo- 
ry expansion  to  over  1MB  on  an 
App/eWor^s-compatible  RAM 
board,  built-in  disk  drive  and  peri- 
pherals interfaces.  On  the  IBM 
compatibles  side  of  the  line,  the 
company  showed  its  Laser  Com- 
pact XTE  ($599),  with  512K  RAM 
(expandable  to  640K),  multiple  vid- 
eo mode  support,  and  built-in  disk 
drive.  The  Laser  Compact  XTE 
($699)  delivers  640K  RAM,  built-in 
expanded  memory  standard,  and 
EGA  graphics  support.  Coming  later 
in  the  year  from  Laser  are  a  IlGS 
compatible,  tentatively  priced  at 
under  $600,  and  an  IBM  AT  com- 
patible for  under  $800. 

Productivity 

Productivity  and  applications  soft- 
ware is  available,  by  now,  for  every 
machine  and  every  budget.  The 
new  products  on  display  in  Las  Ve- 
gas sported  enhanced  capabilities, 
easy-to-use  interfaces,  and  compet- 
itive prices. 

Timeworks  tackled  the  desk- 
top publishing  market  across  the 
board  with  Publish  It!  (MS-DOS, 


Consumer  Electronics  Show 


$149.95;  Apple  II  series,  $99.95;) 
and  Desktop  Publisher  ST  (ST, 
$129.95;  64/128  version  to  be  intro- 
duced later  this  year).  For  the  MS- 
DOS  market,  the  company  debuted 
The  Executive  Word  Writer  PC 
($149.95),  a  full-feahired  word  and 
outline  processor,  with  built-in 
spelling  and  style  checkers.  To  man- 
age taxes,  there  was  Sylvia  Porter's 
SwifTax  (MS-DOS,  Apple  11, 
$69.95). 

Paperclip  Publisher  ($49,95) 
from  Electronic  Arts  brings  an 
Amiga -style  interface  to  the  64/128 
desktop  publishing  environment. 

Having  created  a  strong  mar- 
ket with  its  64/128  CEOS  series  of 
packages,  Berkeley  Softworks  let 
audiences  at  CES  know  that  the 
operating  system  would  be  ported 
to  the  Apple  environment.  Berkeley 
also  showed  geoProgrammer 
(64/128,  $69.95). 

Learning  Tools 

The  marriage  of  microcomputers  and 
education  is  entering  its  second  de- 
cade, with  educational  software  pub- 
lishers seeing  dramatic  growth  in  the 
home  market  for  their  products. 

Davidson  showed  Read  'N  Roll 
(Apple  II,  $49.95;  MS-DOS  to  come 
later  in  1988),  which  allows  teach- 
ers and  parents  to  tailor  reading 
exercises  aimed  at  helping  students 
better  understand  the  contexts  and 
inferences  of  words,  as  well  as  their 
meanings. 

"Know  Thyself"  might  be  the 
advice  followed  by  Three-Sixty 
with  Bridges  (MS-DOS,  Macintosh), 
a  psychological  profile/motiva- 
tional package  developed  by  psy- 
chologist and  NASA  consultant  Dr. 
Taibi  Kahler. 

With  Sesame  Street  Print  Kit 
(MS-DOS,  Apple  II,  64/128,  Atari 
8-bit,  $14.95),  from  Hi  Tech  Ex- 
pressions, students  can  put  familiar 
characters  from  the  popular  PBS 
program  to  work  in  banners,  greeting 
cards,  and  other  printed  materials. 
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Also  announced  was  Sesame  Street 
Learning  Library  (MS-DOS,  64/128, 
$24,95)  a  three-volun^e  bundle  of 
activity  software.  Older  students 
(ages  7-12)  can  visit  The  Computer 
Clubhouse  (MS-DOS,  Apple  II, 
$14,95)  an  integrated  package  of 
application  and  utility  software  de- 
veloped with  kids  in  mind,  includ- 
ing word  processor,  calculator, 
name  and  address  file,  and  a  car- 
toon program  called  "Sideshow," 
which  can  be  viewed  while  other 
applications  are  running. 

For  children  wishing  to  create 
their  own  books,  Compu-Teach 
debuted  Once  Upon  A  Time  (MS- 
DOS,  Apple  II,  $39,95),  an  interac- 
tive desktop  publishing  program 
that  comes  with  a  variety  of  graph- 
ics images.  The  package  is  aimed  at 
children  ages  6-12. 

Weekly  Reader's  emphasis 
was  on  two  new  products.  Vocabu- 
lary Development  (MS-DOS,  Apple 
II,  $39.95),  designed  for  grades  3-6, 
aims  at  aiding  in  mastering  skills 
such  as  synonyms,  antonyms,  pre- 
fixes, suffixes,  and  other  aspects  of 
vocabulary.  The  program  allows 
teachers  and  parents  to  design  and 
print  their  own  exercises,  Reading 
Comprehension  (MS-DOS,  Apple  II, 
$39.95)  for  grades  4-6,  stresses 
reading  skills  including  distinguish- 
ing between  main  idea  and  details, 
cause  and  effect;  the  package  con- 
tains 30  stories,  and  allows  for 
teacher  or  parent  customization, 
and  tailoring  to  individual  children. 

Utility 

More  and  more  software  publishers 
are  providing  materials  to  help 
computer  users  use  their  computers 
more  efficiently. 

Spinnaker  introduced  Running 
Start  (MS-DOS,  $39.95),  which  in- 
cludes instruchon  in  DOS  opera- 
tion, typing,  and  word  processing. 

Design  Software  (distributed 
by  Electronic  Arts)  unveiled  a  vari- 
ety of  utilities,  including  DS  Backup 
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(MS-DOS,  $79.95),  a  backup/restore 
program,  and  DS  Tutor  (MS-DOS, 
$39.95),  an  instructional  package,  as 
well  as  several  other  utility  packages. 

Publishing  International 
continues  to  extend  its  line  of  Byte 
Size  products.  Aggressively  priced 
at  under  $20,  new  additions  to  the 
list  include  Telecommunications. 
Gift  List,  and  Coupon  Finder. 

Targeting  telecommunications 
for  the  Apple  IlGS  is  Activision, 
with  Teleworks  Plus  ($99,95;  avail- 
able for  $50  in  exchange  for  page  1 
of  the  user's  current  communica- 
tions manual). 

Pretty  Pictures 

Activision  displayed  Paintworks 
Gold  (Apple  llGS  with  minimum 
1.25MB  RAM,  $99.95)  which  offers 
color  masking,  page  switching,  trans- 
parent colors,  and  other  features. 

Photon  Paint  (Amiga,  $99,95) 
from  Microillusions  (distributed 
by  Activision)  is  a  hold-and-modify 
paint  program  able  to  bring  more 
than  4,000  colors  to  the  screen  at 
once. 


IBM  artists  were  addressed  by 
Spinnaker  with  Splash  (price  not 
set),  which  takes  full  advantage  of 
VGA's  256,000  colors  and  provides 
tools  to  work  with  them.  MS-DOS 
painters  were  also  addressed  by 
Electronic  Arts,  which  announced 
the  translation  of  DeluxePaint  U 
($149.95)  to  the  MS-DOS 
environment. 

Desktop  video,  unheard  of  a 
couple  of  years  ago,  is  a  category 
experiencing  sharp  growth,  EA 
showed  DeluxeProductions  (Amiga, 
$199.95),  a  hi-res  graphics  anima- 
tion package  aimed  at  the  computer 
presentation  market.  A  companion 
product  DeluxePhotoLab  (Amiga, 
$99.95)  offers  photographic-quality 
image  manipulation. 

Also  entering  the  desktop  vid- 
eo market  is  Epyx,  with  Home  Video 
Producer  (MS-DOS,  64/128,  Apple 
II,  $49.95),  a  package  that  adds  text, 
graphics,  and  special  effects  to  cam- 
corder videos.  Microillusions  an- 
nounced Cell  Animator  (Amiga, 
$149,95),  which  permits  manipula- 
tion of  image  and  sound. 


Use  IRS  label. 

Otherwise, 
please  print  or 
type. 


Presidentia 
Election  Ca 


Fifing  Sti 

Check  only 
one  tiox. 


Exemptions 

(See 

Instructions 
0(1  pjge  7  ) 


if  more  than  V 
dependents,  see 
Instructions  on 
I'nge  7 


D(>pnrtni(?nt  of  tfi*?  Treasury — -Internal  RcvGnue  Service  CI    fC\^  Wm 

U.S.  Individual  Income  Tax  Return    U^O 


For  the  year  Jan. -Dgc.  31,  1987.  or  other  taic  year  beginning 

(Your  lirst  name  and  initial  (it  join!  return,  also  give  spouse's  name  and  initial) 


Present  home  address  (number  and  street  or  rural  route).  (It 


1987.  endmg 


City,  town  or  post  office 


^...^f-^ 


^^J^S^- 


19  I  0MB  Np  I545-QQ74 

Your  social  security  number 


Spouse's  social  security  number 


or  Privacy  Act  and  Paperwork  He- 
tiction  Act  Notice.  s»  Instructions. 

HjQ     HaW.  Checking  •yes"yiiin 
^=-  noi  change  your  Isx  or 

reduce  your  refund. 


on  is  your  child  but  not 


of  boies  — 

ked  on  6a 

6b 

f  childfcit        r~ 
iwho  lived 

lU 

hildren 
!io  didn't 

lyoudut 


.cteef^ 


cof® 


DO  IT  YOURSELF 

Prepare  your  personal  federal  income  tax  return  with  thiis 
easy-to-use  CPA  designed  program.  Personal  Tax  Preparer's  "on- 
line" help  and  easy-to-follow  menus  and  screens  will  guide  you 
every  step-of-the-way  througti  your  1987  return. 

Whiether  you  do  your  own  return,  wont  to  check  on  your  tax 
preparer,  or  want  a  guide  to  plan  your  1988  tax  situation. 
Personal  Tax  Preparer  is  for  you. 

Order  today  and  own  Personal  Tax  Preparer  for  only  $29. 
Add  S3  shipping  and  handling  {outside  North  America  add  S7). 
Iowa  residents  please  add  4%  sales  tax.  Send  check  or  money 
order  payable  to  Parsons  Technology  VISA,  MasterCard  and 
COD  orders  welcome. 


VISA,  MasterCard  &  COD  orders  cat!: 

i -800-223-6925 

(In  Canada  319/395-7300) 

1 

1987  PERSONAL 
^--T^H^  TAX  PREPARER 

S29  -!-  S3  Shipping 


Dept.  COM 

373  Collins  Boad  HE 

Cedsr  Rapids.  lA  52402 

Personal  Tax  Preparer  requires  IBM  or  compatible  com- 
puler,  DOS  2.0  or  later  and  printer.  Please  specify 
memory  model: 

Small  memory  model  (requires  192k  memory] 

Large  memory  model  (requires  5<2k  memory) 


Name: 

Address: 

City/State/Zip: . 
Phone: 


CtiGCk Money  Order 'VISA MasterCard . 

I  Card  It Exp  Date 


:-J 


CES  Report 


Videogames  Redux 

The  computer  wing  at  CES  struck 
some  industry  insiders  as  a  remeni- 
brance  of  CESs  past:  Videogame 
cartridge  manufacturers  came  close 
to  dominating  the  floor,  Nintendo 
and  Sega,  riding  high  on  the  best 
videogame  year  in  years,  mounted 
huge  exhibits,  touting  the  increased 
sophistication  of  their  videogames, 
many  of  which  are  translations  of 
established  software  hits. 

Software  publishers  are  aware 
that  dedicated  videogame  machine 
sales  may  represent  lost  computer 
sales,  but  they're  also  confident  of 
their  ability  to  produce  games  that 
are  more  exciting,  more  playable, 
and  more  attractive  than  those  cur- 
rently on  cartridges. 

Besides  which,  one  of  the  most 
obvious  entertainment  software 
trends  at  CES  was  the  software  in- 
dustry's determination  to  beat  the 
cartridge  manufacturers  at,  as  it 
were,  their  own  games. 

Arcade  Comeback 

Responding  to  the  Nintendo/Sega 
surge,  as  well  taking  advantage  of 
increased  machine  capability  and 
programming  skill,  software  pub- 
lishers rolled  out  perhaps  more  ar- 
cade action  software  than  at  any 
show  in  years,  pumping  energy 
into  the  revitalization  of  a  classic 
software  form. 

At  Activision  and  Arcadia  (an 
Electronic  Arts  affiliate),  monsters 
wreak  havoc  in  Rampage  (from  Ac- 
tivision for  the  64  and  Apple  II 
series,  $34.95;  MS-DOS,  $37.95) 
and  Aaargh  (from  Arcadia  for  the 
Amiga,  $39.95).  Both  games  are 
translations  of  established  coin  ar- 
cade hits.  For  MS-DOS  arcade  fans, 
Arcadia  has  Rockford  (MS-DOS, 
$39.99),  a  sequel  to  Boulderdash. 

Epyx  announced  an  array  of 
arcade  games  including  Impossible 
Mission  U  (64/128,  ST,  Apple  II 
series,  MS-DOS,  $39.95),  the  se- 
quel to  Impossible  Mission,  marking 
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the  return  of  evil  genius  Elvin; 
Metrocross  (64/128,  ST,  $24.95 
through  the  company's  new  U.S. 
Gold  line),  in  which  players  race  a 
clock  through  an  obstacle-filled  ur- 
ban setting;  and  Street  Cat  (64/128, 
MS-DOS,  ST,  Amiga,  $24.95,  also 
from  U.S.  Gold),  which  offers  feline 
competition  to  determine  the 
town's  toughest  cat. 

Translating  coin-op  games  to 
home  computers  is  something  of  a 
specialty  at  Data  East,  whose  1988 
list  includes  such  arcade  favorites 
as  the  off-road  action  of  Speed  Bug- 
gy (64/128,  $29.95;  ST,  $44.95),  the 
ninja  maneuvers  of  Kid  Niki  (64/ 
128,  $29.95;  Apple  II,  $34.95),  and 
the  commandos  of  Ikari  Warriors 


Kid  Niki 

(Apple  II,  $34.95,  MS-DOS,  $39.95). 
Arcade  addicts  can  customize 
their  own  games  with  Breder- 
bund's  Arcade  Construction  Kit 
(64/128,  $29.95).  The  package  in- 
cludes seven  complete  games  and 
provides  tools  by  which  players  can 
build  their  own  arcade  games,  set- 
ting different  levels  of  animation, 
sound,  and  design. 

Arcade  Plus 

Arcade  elements  mingle  with  strat- 
egy and  tactics  in  a  variety  of 
packages. 

Accolade  lets  players  take  the 
role  of  French  resistance  fighters  in 
The  Train:  Escape  to  Normandy 
(64/128,  $29.95),  and  must  seize, 
hold,  and  run  a  locomotive  through 
Nazi  lines;  in  Power  at  Sea  (64/128, 


$29.95),  players  must  coordinate 
operations  during  the  Battle  of  Ley- 
te  Gulf. 

In  Datasoft's  BattleDroidz 
(64/128,  $24.95;  ST  and  Amiga, 
$34.95)  players  attempt  to  conquer 
alien  enemies.  Also  from  the  EA 
affiliate  is  The  Rubicon  Alliance 
(64/128,  $19.95),  whose  players 
face  an  alien  enemy. 

Ebonstar,  (Amiga,  MS-DOS, 
64/128,  Apple  IlGS,  $39.95)  from 
Microillusions,  (distributed  by  Ac- 
tivision) involves  a  search  for  rogue 
black  holes.  Cosmic  conquest  is  the 
theme  of  the  company's  Galactic 
Invasion  (Amiga,  64/128,  Apple 
IlGS,  MS-DOS,  $24.95). 

The  Topic  Is  Topical 

Global  hot  spots  came  to  life  on 
computer  screens  throughout  CES 
as  publishers  introduced  products 
aimed  at  putting  players  in  charge 
of  tough  tactical  decisions. 

Str-ike  Fleet  (64/128,  $29.95), 
from  Lucasfilm  Games  (distributed 
by  EA),  gives  players  command  of 
modern  fleets,  weapons  systems, 
and  strategies,  with  emphasis  upon 
accuracy  of  detail  and  opponents 
including  the  Soviet  Navy  and 
Ayatollah-inspired  fanatics. 


Red  Storm  Rising 

Microprose  brought  out  its  big 
guns  with  bestseller  Tom  Clancy's 
Red  Storm  Rising  (64/128,  $39.95). 
The  adaptation  preserves  much  of 
the  novel's  narrative,  leaving  the 
results  of  global  confrontation  to 
the  player. 
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VISA,  MasterCard  &  COD  orders  call: 

1-800-223-6925 

[In  Canada  319/395-730.0] 


Here  it  is.  You  won't  find  software  that's  easier  to  use: 

•  Requires  no  accounting  knowledge 

•  Completely  menu-driven  with  on-line  help 

>»  93-page  fully  indexed  tutorial  manual  (on  disi<) 

A  Proven  Track  Record.  Hard  to  believe  the  S16  price?  Don't 

worry.  MoneyCounts®  has  been  marketed  for  three  years  and 

is  continually  receiving  rave  reviews.  There's  no  catch.  This  is  a 

fully  functional  system  that  compares  with  products  selling  for 

$99  and  more, 

Same-Day  Shipping.  Order  today  and  own  MoneyCounts®  for 

only  $16!  Add  $3  shipping  and  handling  (outside  North  America 

add  $7).  Iowa  residents  please  add  4%  sales  tax.  Send  check 

or  money  order  payable  to  Fbrsons  Technology.  VISA  and 

MasterCard  orders  welconn^^ 


COUNTS 

S'16  +  S3  Shipping 


I  Dep!.  COM 

•  373  Collins  Rosd  NE 

I  Cadar  Rapids,  lA  52402 

MoneyCounts'  requires  IBM  Or  compatible  computer 
with  two  disk  drives  (or  a  ha rddijk  drive),  192k  or  more 
memory,  DOS  2.0  or  idler  and  printer. 


I  Name: - 

I  Address: 

I  City/State/Zip: 

i  Phone: 

I  Check Ivtoney  Order . 

I  Card  # 


,  VISA IviasterCord . 

Exp.  Date 


CES  Report 


Another  Clancy  bestseller 
makes  its  appearance  from  Data- 
soft,  with  The  Hunt  for  Red  October 
(ST,  Amiga,  IBM,  $'49.95;  64/128, 
$39.95;  to  be  released  in  mid-1988 
are  Atari  8-bit  and  Apple  II  ver- 
sions, $39.95,  and  a  Macintosh  ver- 
sion, $49.95). 

Cosmi  gives  players  a  shot  at 
navigating  at  the  deadly  Straits  of 
Hormuz  in  NAVCOM  6:  The  Gulf 
Defense  (64/128,  $24.95),  with 
players  in  the  control  center  of  a 
modern  warship  charged  with  pro- 
tecting oil  tankers  negotiating  the 
straits  of  Hormuz.  The  company 
also  brings  the  dangers  of  interna- 
tional terrorism  home  in  The  Presi- 
dent Is  Missing  (64/128,  $24.95; 
MS-DOS,  $29.95),  which  comes 
with  an  audio  tape  containing  the 
terrorists'  demands,  as  well  as  pos- 
sible clues.  Financial  terrorists,  of  a 
sort,  get  the  home  computer  treat- 
ment in  Cosmi's  Corporate  Raider 
(MS-DOS,  $24.95). 

Harpoon  (MS-DOS,  Macintosh, 
$49.95),  from  Three-Sixty,  is  based 
upon  Larry  Bond's  board  game, 
which  influenced,  among  others, 
Tom  Clancy.  The  computer  version 
gives  players  command  of  allied 
forces  during  a  showdown  in  the 
North  Atlantic,  uses  actual  Navy 
icons,  and  operates  in  realtime. 

Finally,  for  those  who  seek 
transcendence  over  world  tensions, 
there's  Global  Commander  (Atari  8- 
bit,  64/128,  Apple  II,  $29.95;  MS- 
DOS,  Amiga,  ST,  $39.95),  in  which 
you  must  monitor  the  status  of  16 
separate  nations,  allocating  food, 
raw  materials,  and  weapons  with- 
out upsetting  the  world's  balance. 

Strategy  And  Tactics 

Historical — and  futuristic — strategy 
and  tactics  weren't  overlooked, 
either. 

SSI  harks  back  to  the  earliest 

days  of  our  natic  n  in  Sons  of  Liberty 
(64/128,  $34.95;  Apple  II,  MS- 
DOS,  Atari  8-bit,  $39.95),  which 
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recreates  several  of  the  major  bat- 
tles of  the  Revolutionary  War.  A 
more  recent  simulation  can  be 
found  in  Panzer  Strike!  (64/128, 
$44.95;  Apple  II,  $49.95)  a  Worid 
War  II  simulation  that  includes 
most  of  the  ground  weapons  em- 
ployed during  several  campaigns. 

Dan  Bunten's  Sport  of  War 
(64/128,  $34.95)  from  Electronic 
Arts  is  a  modem  wargame  that  al- 
lows players  to  pit  their  strategic 
skills  against  other  gamers,  includ- 
ing those  playing  on  Apple  lis  or 
MS-DOS  machines.  Also  from  EA, 
Interceptor  (Amiga,  $49.95)  gives 
players  the  choice  of  flying  an  F-18 
Hornet  or  F-16  Falcon  in  defense  of 
San  Francisco  Bay. 

SSG  (distributed  by  EA)  intro- 
duced Decisive  Battles  of  the  Ameri- 
can Civil  War,  Volume  I  (Apple  II, 
64/128,  $39.95),  which  includes 
the  battles  of  First  and  Second  Bull 
Run,  Shiloh,  Antietam,  Fredericks- 
burg, and  Chancellorsville. 

Interstel  (through  EA)  dis- 
played two  additions  to  Starfleet: 
Empire  (MS-DOS,  Amiga,  ST, 
$49.95),  a  planetary  conquest 
game,  and  Starfleet  U:  Krellan  Com- 
mander (MS-DOS,  $54.95). 

Epyx's  Dive  Bomber  (Apple  II, 
64/128,  MS-DOS,  ST,  and  Amiga, 
$39.95)  challenges  players  to  fly  a 
carrier-launched  torpedo  bomber 
against  a  variety  of  German  aircraft, 
mine  fields,  and  ships,  including 
the  Bismarck, 

Fantasy  Time 

Citadel  (Macintosh  512K,  $49.95) 
from  Mindscape  is  a  fantasy  role- 
playing  game  in  which  players  cre- 
ate characters  from  the  moment  of 
birth,  developing  their  personalities 
throughout  the  game. 

Questron  II  (64/128,  $39.95; 
MS-DOS,  Apple  II,  $44.95;  ST, 
Amiga,  $49.95  )  from  SSI  is  a  sequel, 
in  which  players  must  journey  back 
in  time  to  prevent  the  Evil  Book  from 
ever  coming  into  existence. 


Citadel 

Death  Sword  (64/128,  Apple  II, 
ST,  MS-DOS,  $24.95)  from  Epyx  is 
an  animated  fantasy  contest  in 
which  players  must  use  their  sword 
skills  in  an  attempt  to  win  freedom 
for  a  captive  princess. 

land  of  Legends  (Amiga, 
$49.95;  64/128,  IlGS,  MS-DOS  ver- 
sions to  follow))  is  an  animated  fan- 
tasy role-playing  game  from  Micro- 
illusions. 

Electronic  Arts  goes  boldly 
into  both  science  fiction  and  fantasy 
with  Futuremagic  (MS-DOS,  no 
price  set),  which  mingles  magic 
with  science  in  an  animated 
adventure. 

Suspense 

Paragon  (distributed  by  EA),  fresh 
from  the  success  of  the  graphics  ad- 
venture Master  Ninja,  moved  into  a 
new  form  with  Twilight's  Ransom 
(MS-DOS,  $34.95;  translations  for 
other  machines  to  follow)  which 
combines  text  with  graphics  in  a 
race  against  time  to  solve  a  mystery. 

Commando  Cody,  rocket- 
packed  airman  of  World  War  II  re- 
turns in  Cinemaware's  Rocket 
Ranger  (64/128,  $34.95;  MS-DOS, 
$44.95;  Amiga,  Apple  IlGS,  ST, 
$49.95).  It's  up  to  you,  your  rocket 
pack,  and  your  dukes  to  save  the 
world  from  Nazi  domination,  time 
travel,  and  Zombie  Women  of  the 
Moon. 

Epyx's  "Masters  Collection" 
line  gets  another  addition  with  L.A. 
Crackdown  (64/128,  Apple  II,  MS- 
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DOS,  $39.95),  in  which  players  at- 
tempt to  crack  a  major  drug 
smuggling  ring. 

Sierra  gives  a  glimpse  of  a 
grim  future  in  Manhunter  (MS- 
DOS,  $49.95),  set  against  the  back- 
drop of  a  conquered  earth,  with 
players  attempting  to  crack  an  un- 
derground (literally)  resistance 
movement.  The  company  moves 
back  in  time  with  Gold  Rush  (MS- 
DOS,  price  not  set). 

The  suspense  and  majesty  of 
James  Clavell  comes  to  computers 
in  Thunder  Mountain's  Tai  Pan 
(64/128,  ST,  $14.95).  The  Mind- 
scape  division  is  also  introducing 
Murder  by  the  Dozen  (64/128,  Ap- 
ple II,  Macintosh,  MS-DOS,  $9.95), 
a  mystery  game  for  up  to  three 
players. 

On  a  lighter  criminal  note.  Car- 
men San  Diego  is  on  the  loose  again 
in  Braderbund's  Where  in  Europe  Is 
Carmen  San  Diego?  (Apple  II,  MS- 
DOS,  $44.95;  64/128,  $39.95).  The 
latest  in  the  popular  series  includes 
a  Crimestopper's  notebook,  an  on- 
screen map  of  Europe,  and  an  on- 
line database  filled  with  European 
information. 

Here  Come  The  Comics 

Not  all  of  the  entertainment  soft- 
ware was  games.  Infocom  dis- 
played its  first  nontext  product, 
Infocomics  (Apple  II,  MS-DOS, 
64/128,  $12),  developed  by  Tom 
Snyder  Productions,  which  are 
comic  books  on  disk. 


Viewers  can  page  through  the 
comic-book  stories  at  the  touch  of  a 
key;  a  keystroke  likewise  allows  for 
a  shift  in  the  point-of-view  from 
which  the  stories  are  told.  Using 
line  graphics,  Infocomics  delivers 
cinema-style  effects,  including 
pans,  zooms,  and  wipes.  The  first 
Infocomics:  lane  Mastodon  vs.  the 
Blubbermen,  a  spoof  of  1930's  sci- 


Gamma  Force  in  Pit  of  a 
Thousand  Screams 

ence  fiction;  Gamma  Force  in  Pit  of  a 
Thousand  Screams,  a  superhero  ac- 
tion/adventure; and  Zorkquest:  As- 
sault on  Egreth  Castle,  a  fantasy. 
Each  Infocomic  provides  four  to 
five  hours  of  viewing. 

Comic  effects  of  a  different  sort 
are  on  display  in  Cinemaware's 
The  Three  Stooges  (64/128,  $34,95; 
MS-DOS,  $44,95;  Amiga,  Apple 
TIGS,  ST,  $49.95),  an  interactive 
movie  in  which  the  player  maneu- 
vers Larry,  Moe,  and  Curly  through 
a  series  of  (mis)adventures  as  they 
try  to  save  an  orphanage  from 
foreclosure. 

Good  Sports 

John  Madden  Football  (Apple  II, 
$44,95)  from  Electronic  Arts  is  a 
football  game  that  distills  the  for- 
mer coach's  experience,  giving 
players  an  on-disk  playbook,  as 
well  as  the  chance  to  design  their 
own  plays. 

EA's  latest  sports  offerings  also 
included  World  Tour  Golf  (Amiga, 
$39.95)  and  Ferrari  Formula  One 


(Amiga,  $49.95). 

Boxing  fans  are  invited  to  ring- 
side in  Gamestar's  Star  Rank  Boxing 
11  (64/128,  $29.95;  Apple  II, 
$34.95;  MS-DOS,  $42.95),  which 
challenges  players  not  only  to  per- 
form well  in  the  ring,  but  also  to 
train  and  workout  for  a  fight. 

Epyx  announced  Street  Sports 
Soccer  (64/128,  Apple  II,  MS-DOS, 
$39.95).  Soccer  continues  the  ser- 
ies's urban  playground  motif,  with 
players  selected  from  neighbor- 
hood kids,  and  games  taking  place 
in  city  parks  or  on  streets.  Endorsed 
by  The  Sporting  News,  Epyx's  Sport- 
ing News  Baseball  (64/128,  MS- 
DOS,  Apple  11,  $39.95)  lets  players 
assemble  teams  whose  per- 
formance is  affected  by  their  statis- 
tical history.  With  i'x  4  Offroad 
Racing  (64/128,  Amiga,  MS-DOS, 
$39.95),  players  can  configure  their 
own  vehicle  for  rough  country. 


i  X  4  Offroad  Racing 

The  Games — Winter  Edition 
(64/128,  Apple  II,  MS-DOS, 
$39.95}  sports  a  setting  in  the 
mountains  above  Calgary  and  in- 
cludes competition  events  such  as 
Oval-track  Speed  Skating,  Luge, 
Slalom,  Downhill  Skiing,  and  others. 

Sedentary  types  can  play  three 
types  of  poker  with  Ronald  Reagan, 
Mikhail  Gorbachev,  and  Margaret 
Thatcher  in  Accolade's  Card  Sharks 
(64/128,  $29.95),  or  players  may 
enjoy  a  fast  game  of  Hearts  or 
Blackjack  with  those  or  other  char- 
acters included  in  the  game. 
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When  you  want  to  talk  computers.. 


ATARI  COMPUTERS 


65XE  64K  Computer '99.99 

130XE  132K  Computer  ......  129.00 

520STFM  Monochrome  System . .  Call 

520STFM  Color  System   749.00 

SF1224  Color  Monitor 309.00 

SF124  Mono  Monitor 149.00 


AMIGA  SOFTWARE 


Atari  1040  sr\ftft 

Color  System  929 

includes:  1040ST,  1  mb  RAM  witti  SVz" 
drive  built-in,  192K  ROM  with  TOS, 
Basic,  ST  language  and  color  monitor. 


ATARI  ST  SOFTWARE 


Access 

Leaderboard  Goflf 24.99 

Antic 

Stereo  CAD  30 59.99 

Avant  Garde 

PC  Ditto  (IBM  Emulation) 69.99 

Batteries  included 

Degas  Elite 44.99 

DAG 

Easy  Accounting 59.99 

Timeworks 

Swiftcalc 47.99 

VIP 

Professional  (GEM) 144.00 


AMIGA  SOFTWARE 


Aegis  Development 

Animator/Images 89.99 

Electronic  Arts 

Deluxe  Video  1.2 89.99 

Gold  Disk  Software 

Pagesetter  w/Text  Ed  89.99 

Micro  Illusions 

Dynamic  CAD 349.00 

Micro  Systems  Software 

Scribble   69.99 


Word  Perfect  Corp.  ^.  .  « 
WordPerfect  *199 

Absoft 

AC  Basic 139.00 

Aegis  Development 

Draw  Plus .149.00 

Sonix 49.99 

Discovery  Software 

Marander  II 31.99 

New  Tek  Inc. 

DigiView  2.0 149.00 

Digi-Paint 44,99 

Suis-Logic  Corp. 

Flight  Simulator  II   39.99 


MACINTOSH  PRODUCTS 


Hard  Drives 
CMS 

MacStack  20   599.00 

Eve  rex 

20  MB  SCSI 599.00 

Mountain 

20  MB  SCSI 899.00 

FLOPPY  DRIVES 
Ehman  Engineering 

800K  External 189.00 

Mirror  Technologies 

Magnum  800K 199.00 

MONITORS 
Network  Specialties 

Stretch  Screen  20 1,599.00 

Sigma  Designs 

Laser  View  Display  System  .  1 ,899.00 

MEMORY  UPGRADES 
Dove  Computer 

MAC  Snap  Plus  2 269.00 

MAC  Memory 

Max  Plus  Mega 329.00 

Turbo  SE  16  MHz 369.00 

SCANNER 

AST 

Turbo  Scan 1,299.00 


MS/DOS  SYSTEMS 


AST  Premium  Computer Call 

Compaq from  1699.00 

IBM-PS-2  Model  30  Call 

IBM-AT  Enhanced Call 

Leading  Edge from  999.00 

PC-TOO  512K  AT  Compat  from  999.00 
NEC  Multispeed  Lap-Top 
Computer 1 ,349.00 

r 


TOSHIBA 

T-1000  Lap  Top  Computer 


^799 


MULTIFUNCTION  CARDS 


AST 

Six  Pal<  Plus  PC/XT 129.00 

Hercules 

Color  Card 149.00 

Graphics  Card  Plus 169,00 

Fifth  Generation 

Logical  Connection  256K   .  .  .  .299.00 

Quad  ram 

XT-386  Inboard   799.00 

Video  7 

VEGA  EGA  Deluxe 229.00 

Zuckerboard 

Color  Card  w/Parat!el 89.99 

Ashton-Tate 

d-Base  111+ 399.00 

Borland 

Quattro 129.00 

5th  Generation 

Fastback  Plus 89.99 

IMSI 

Optimouse  w/Dr,  Halo 89.99 

Logitech 

C  &  Mouse  w/software   79.99 

Lotus 

Lotus  1-2-3 319,00 

MicroPro 

Professional  4.0  w/GL  Demo   .239,00 

Word  Perfect  Corp. 

Word  Perfect  4,2 209.00 


MS/DOS  SOFTWARE 


y 


COMPUTER  MAIL  ORDER 


When  you  want  to  talk  price. 


MONITORS 


m 

Magnavox  5-.^ 

623  Amber  TTL  99 

Amdek 

Video  300  Amber  Composite  .119.00 
Magnavox 

8502  Composite 169.00 

8515  RGB/Composite 269.00 

8767  RGB/Composite  .....  ."NEW 

Packard  Bell 

1420  CG  14"  Mid  Res  CGA  .  .269.00 

1422EG  14"  Hi  Res  EGA  .  .  .  .369.00 

8526  MJ  Uniscan  Monitor .  . .  .399.00 

NEC 

JG-1402P3A  Multisync  II Call 

1501  Multisync  Plus Call 

Princeton 

MAX-12  12"  Amber  TTL 139.00 

Thomson 

450  15"  132  Col.  Amber 149.00 

4120  RGB/Composite 239.00 


DRIVES 


Atari 

AA314  DS/DD  Disk  (ST) 199.00 

AA354  SS/DD  Disl<  (ST) 129,00 

SHD204  20  Mb  ST  Hard  Drive  549.00 
C.LTD  (For  Amiga) 

C.LTD  20MB    899.00 

C.LTD  33MB    999.00 

A500  SCSI  Controller 179.00 

Indus 

GT  Disk  Drive  Atari  XL/XE  . .  .179.00 

Racore 

Jr.  Expansion  Cliassis 299.00 

Seagate 

20MB  ST-225  Hard  Drive  Kit   .339.00 

Supra 

20  Meg  Hard  Drive  (Amiga)   .  .739.00 

20  Meg  Hard  Drive  (ST) 549.00 

Xebec 

20  Meg  Hard  Drive  (Amiga)   .  .799.00 


MODEMS 


Anchor 

6480  C64/128  1200  Baud 99.99 

VU520  ST520/1040  1200  Baud129.00 
1200E  1200  Baud  External  . .  .129.00 
Atari 

SX212  (ST) 88.99 

Avatex 

1200  HC  External   109.00 

2400  External 219.00 

Best  Products 

1200  Baud  Vz  Card  w/software  .89.99 

Everet 

Evercom  1200  Baud  Internal. .  .99.99 

Hayes 

Smartmodem  300 139.00 

Smartmodem  1200  External  .  .289.00 
Packard  Bell 

1200  External 89.99 

2400  External 169.00 

Practical  Peripherlats 

Complete  Telecom  Pkg 99.99 

2400SA  2400  Baud 199.99 

Supra 

MPP-1064  AD/AA  C64 69.99 

2400AT  2400  Baud  Atari 169.00 

U.S.  Robotics 

2400  Baud  Internal  179.99 


U.S.  Robotics 
1200  Baud  External 


DISKETTES 


'89 


Maxell 

MD1-M  SS/DD  bVi" 8.49 

MD2-DM  DS/DD  5'/^" 9.49 

MF1-DDM  SS/DD  3Vz" 12.49 

MF2-DDM  DS/DD  3V2" 18.49 

MC6000  DC  600  Tape 23.99 

Sony 

MD1D  SS/DD  5V4"    6.99 

MD2D  DS/DD  5Va"   7.99 

MFD-1DD  SS/DD  3Vz"    11.99 

MFD-2DD  DS/DD  SVa"    16.99 


PRINTERS 


Atari 

1020  XL/XE  Plotter '31.99 

XDM  121  Letter  Quality 149.00 

XMM801  XL/XE  Dot  Matrix  .  .  .189.00 

XMMB04ST  Dot  Matrix 179.00 

Brother 

M-1109  100  cps,  9  pin 199.00 

M-1409  180  cps,  9  pin 309.00 

Citizen 

MSP-25  200  cps,  132  col  ...  .289.00 

Premier  35  cps  Daisywheel .  .  .479.00 

C.ltoh 

31 5P  132  Column  Prowriter  .  .549.00 


Star  Micronics 

NX1000  SifiQ 

144  cps  80-column  I  Q9 

Epson 

LX-800  150  cps,  80-column.  .  .179.00 

FX-86E  240  cps,  80-column Call 

FX286E  240  cps,  132-column  .  .  .Call 

LQ-500  24  Wire,  80-column Call 

LQ-850  330  cps,  80-Golumn Call 

LQ-1050  330  cps,  132-column  .  .  .Call 
Hewlett  Packard 

Thinkjet 379.00 

NEC 

Pinwriter  2200  24  Wire 379.00 

Pin  writer  660  24  Wire 459.00 

Pinwriter  760  24  Wire 679.00 

Okidata 

Okimate  20  Color  Printer 129.00 

ML-182  120  cps,  80-coiumn  .  .219.00 
ML-192  +200  cps,  80-col.  .  .  .329.00 
ML-193  +200  cps,  132-col.  .  .479.00 
Panasonic 

KX-1080i  144cps,  80-col 189.00 

KX-1091i  194  cps,  80-col 199.00 

KX-P3131  22  cps,  Daisyw/heel  269.00 

Star  Micronics 

NX-1000C  144  cps,  C64  Inter  .189.00 

NX-15  120  cps,  132-column  .  .319.00 

Toshiba 

P-321  SI  216  cps,  24-Pin 539.00 

P-351  SX  300  cps,  24-Pin  .  . .  .999.00 


In  the  U.S.A.  and  in  Canada 

Call  toll-free:  1-800-233-8950 

Outside  the  U.S.A.  call  717-327-9575,  Fax  717-327-1217 

Educational,  Governmental  and  Corporate  Organizations  call  toll-free  1-800-221-4283 

CMO.  477  East  Third  Street,  Dept.  A2,  Williamsport,  PA  17701 

ALL  MAJOR  CREDIT  CARDS  ACCEPTED 

POLICY:  Add  3%  (minimum  $7.00)  shipping  and  handling.  Larger  shipmenls  may  require  additional  charges.  Personal  and  company  checks  require  3  weeks 
to  clear.  For  taster  delivery,  use  your  credit  card  or  send  cashier's  check  or  bank  money  order.  Credit  cards  are  not  charged  until  we  ship.  Pennsylvania  residents 
add  6%  sales  tax.  All  prices  are  U.S.A.  prices  and  are  subject  to  change,  and  all  items  are  subject  to  avaifability.  Defective  software  will  be  replaced  with  the 
same  item  only.  Hardware  will  be  replaced  or  repaired  at  our  discretion  within  the  terms  and  limits  ol  the  manufacturer's  warranty.  We  cannot  guarantee  com- 
patibility. All  sales  are  final  and  returned  shipments  are  subject  to  a  restocking  fee. 


CES  Report 


CIE 


For  more  information  on  the  products  mentioned  in  tfiis  article,  please  contact  the  appropriate  company  from  ttie  list  below. 


Accolade 

20813  Stevens  Creek  Blvd. 
Cupertino,  CA  95014 

Activislon 

2350  Bayshore  Parkway 
Mountain  View,  Cft  94043 

Amstrad 

1915  Westridge  Dr. 
Irving,  TX  75038 

Arcadia 

(distributed  by  Electronic  Arts) 

Berkeley  Sof works 

2150  Shattuck  kje. 
Berkeley,  CA  94704 

Blue  Chip  Electronics 

7305  W.  Boston  St. 
Chandler,  AZ  85226 

Broderbund 

17  Paul  Dr. 

San  Rafael,  CA  94903-2101 

Cinemaware 


4165  Thousand  Oaks  Blvd. 
Westlake  Village,  CA  91362 

Compu-Teach 

78  Olive  St. 

New  Haven,  CT  06511 

Cosmi 

415  N.  FigueroaSt. 
Wilmington,  CA  90744 

Data  East 

470  Needles  Dr. 
San  Jose,  CA  95112 

Datasoft/lntellicreations 

(distributed  by  Electronic  Arts) 
19808  Nordhoff  Place 
Chatswortfi,  CA  91311 


Davidson  &  Associates 

3135KashiwaSt. 
Torrance,  CA  90505 

Design  Software 


(distributed  by  Electronic  Arts) 
1275  W.  Roosevelt  Rd.,  Suite  104 
West  Chicago,  IL  60185 

Electronic  Arts 

1820  Gateway  Dr. 
San  Mateo,  CA  94404 

Epyx 

600  Galveston  Dr. 
Redwood  City,  CA  94063 

Gamestar 

(distributed  by  Activislon) 
Hi  Tech  Expressions 
1700  N.W.  esth  Ai/e.,  Suite  9 
Plantation,  FL  33313 

Infocom 

125  Cambridge  Park  Dr. 
Cambridge,  MA  02140 

Interstel 

(distributed  by  Electronic  Arts) 
P.O.  Box  57825 
Webster,  TX  77598 

Lucasfilm  Games 

P.O.  Box  2009 

San  Rafael,  GA  94912 

Microillusions 

(distributed  by  Activislon) 
17408  Chatsworth  St. 
Granada  Hills,  CA.  91344 

Microprose 

120  Lakefront  Dr. 
Hunt  Valley,  MO  21030 

Mindscape 

3444  Dundee  Rd. 
Northbrook,  IL  60062 


Paragon  Software 

(distributed  by  Electronic  Arts) 
600  Rugh  St. 
Greensburg,  Fft  15601 

Publishing  International 

1209  W.  Knickerbocker  Dr. 
Sunnyvale,  CA  94087 

Sierra  On-Line 

PO.  Box  485 
Coarsegold,  CA  93614 

Spinnaker  Software 

One  Kendall  Square 
Cambridge,  MA  02139 

SSG 

(distributed  by  Electronic  Arts) 

SSI 

1046  N.  Rengstorff  fm. 
Mountain  View,  CA  94043 

Three-Sixty 

2105  S.  Bascom  Ave.,  Suite  290 
Campbell,  CA  95008 

Thunder  Mountain 

(distributed  by  Mindscape) 
Timeworks 

444  Lake  Cook  Rd. 
Deerfield,  IL  60015 

Vendex  Pacific 

40  Cutter  Mill  Rd. 
Great  Neck,  NY  11021 

Video  Technology 

400  Anthony  Trail 
Northbrook.  IL  60062-2536 

Weekly  Reader  Software 

10  station  PI, 
Norfolk,  CT  06058 


[Ed.  Note:  Most  of  the  products  described  in  this  article  are  scheduled  for  release  during  the  first  half  of  1988. 
Space  limitatio7is  precluded  us  from  listing  release  dates  for  specific  products.] 
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Make  Any  Computer  Do  Exactly  What  You  Want  With  McGrawHilVs 

Contemporary    i  ^ 


'T'^ 


I 


From  Writing  Your  Own  Programs  to        ~  "~ 
Modifying  Existing  Software,  Here's  the  New, 
Easy,  and  Low  Cost  Way  to  Unlock  tlie  Secrets 
of  Your  Computer 

Whether  you  use  computers  for  business,  for  personal 
applications,  or  for  fun,  off-the-shelf  programs  will  never  do 
everything  you  want  them  to  do  for  you.  That's  because  they 
were  written  by  programmers  to  satisfy  what  they  perceived 
as  the  needs  of  the  greatest  number  of  potential 
users — often  missing  some  or  many  of  your 
specific  needs. 

That's  why  McGraw-Hill's  new  Contemporary 
Programming  and  Software  Design  Series  leaches 
you  how  to  create  your  own  software . . .  either 
from  scratch  or  by  making  key  modifications  to 
existing  programs. 

There  is  nothing  magical  about  it.  You  learn  the 
process  of  building  a  computer  program  step-by- 
step  with  McGraw-Hill  Concept  Modules  sent  to  you  one  at  a 
time,  once  a  month.  Each  of  the  ten  modules  in  the  Series  takes 
you  through  an  important  step  in  the  development  of  the 
structure  and  detailed  logic  of  a  program,  including  testing, 
debugging,  and  documentation. 

Unique  Interactive  Hands-On  Instruction 

Each  module  includes  an  easy-to-understand  guide  PLUS  a 
5'/i "  floppy  disk  containing  typical  programs  and  interactive 
instruction  that  you  can  run  on  Commodore  64  and  128  computers,  IBM 
PCs  and  PC  compatibles  for  hands-on  experience. 

In  the  first  Module,  for  example,  when  your  sample  program  (Declining 
Interest  Loans)  appears  on  your  screen,  you'll  find  errors  on  certain  pro- 
gram lines.  You'll  also  see  that  the  program  is  only  three-quarters  completed. 

Now  comes  the  fun  part.  You'll  discover 
how  this  program  is  built,  and  in  the  process 
you'll  learn  how  to  identify  and  correct 
errors.  And  by  the  end  of  Module  i, 
you'll  actually  have  completed  this 
program  yourself. 

But  there's  more.  Special  graphics 
on  your  screen  work  in  conjunc- 
tion with  the  accompanying  guide 
to  amplify,  illustrate,  and  deepen 
your  understanding  of  software 
design  principles. 


The  Crucial  95%— Learn  the  Foundation  of  Computer  Programming 

While  the  Series  includes  interactive  disks  that  run  on  specific  computers,  everything 
you  learn  you  can  apply  to  any  language  or  machine.  Why  is  this  possible?  Because 
McGraw-Hill  knows  programming  is  far  more  than  coding  a  program  into  the  computer 
using  a  specific  language.  In  the  real  world  of  computers,  95%  of  the  programming  pro- 
cess is  carried  out  using  design  techniques  that  are  independent  of  specific  language  or 
machine.  It  is  this  crucial  95%  that  you  thoroughly  understand  and  master  in  the  Series. 


Make  no  mistake.  Almost  all  books  and  courses  on  "programming" 
teach  you  only  the  final  5%  of  the  total  programming  process- 
namely,  how  to  code  in  a  specific  language . . .  information  of  little 
value  if  you  don't  know  how  to  reach  the  point  in  the  programming 
process  when  you  are  ready  to  code. 

With  the  Series,  however,  you'll  learn  to  create  your  own  programs 
from  scratch,  even  modify  off-the-shelf  programs.  You'll  learn  enough 
BASIC  and  machine  language  to  get  you  started  on  the  remaining 
5%  of  the  programming  process. 

Build  Your  Own  Personal  Software  Library 

The  sample  programs  you  work  with  throughout  the 
Series  are  excellent  learning  tools.  But  they're  more  than 
that.  By  combining  the  sample  programs  onto  one  master 
disk,  you'll  have  the  start  of  your  own  personal  software 
library.  In  addition  to  the  programs  you've  written  and 
modified  throughout  the  Series,  you'll  also  receive  dozens 
of  the  most  popular  public  domain  and  user-supported  pro- 
grams, such  as  data  base  manager,  word  processor,  calen- 
dar generator,  appointments  reminder  and  much, 
much  more. 

15-Day  No-Risk  Trial 

To  order  your  first  module  without  risk,  send  the 
postage-paid  card  today. 
Examine  the  first  module 
for  15  days  and  see  how 
the  Series  will  help  you 
make  your  computer  do 
I  exactly  what  you  want 
it  to  do! 


If  someone  has  beaten  you  to  the  card,  write  to  us  for  order- 
ing information  about  the  Contemporary  Programming  and 
Software  Design  Series. 


m 


McGraw-Hill 

Continuing  Education  Center 

3939  Wisconsin  Avenue 
Washington,  DC  20016 


Our  Bdck  Pag@S 


A  Decade  Of  Reader's  Feedback 

Second  I    ''""  ^^J'«"  by  GoS  "^  ^"^^^^m 
^ithPOK^Z'^^^^'^e).  Can  ri      ^'^'^  ""^Y 
Hshed  a  pFt  b  A°^^^-  '  hJd  yo^T  ^  ^"^^d) 
■■  "°^  «n  J  get  this?       ^  '"'"^^  «f  COM- 
?'"«  can  rf««^.,  ,,  ^^J«  Rosenthal 

-         "  '"'s  issue. 


Take  a  quick  look  at  the  volume  number  on  the  cover 
of  this  magazine,  and  you'll  notice  that  COMPUTE!  is 
now  in  its  tenth  year.  The  computer  industry  has 
undergone  radical  changes  in  the  past  decade,  and  a 
retrospective  of  COMPUTE'.'s  pages  reflect  many  of 
those  changes.  We  decided  to  scan  back  issues  and 
see  what  topics  and  questions  were  on  readers' 
minds.  Here's  a  sampling  of  "Reader's  Feedback" 
from  our  back  pages. 


OnM©[9;^^9^r^lilL_ — 

What  happened  ioNuts  an     ^^^^^ 

,   J     nqi  in  COMPUTE'.,  iviy  ^^  jj^^n 

include  OSl  i^  ^^^  ^pple  or  1 1 

tnore  in  common  vtn 
with  a  SYM.  ■  •  ■  compute  U 

defined  by  the  '"^^S^^?,  Stember  issue  of  com- 


UPDATE:  Don't  let  the  POKE  scare 
you.  Other  than  the  early  PETs,  no 
computer  can  be  damaged  as  a  result 
of  anything  you  enter  on  the  key- 
board. The  books  mentioned  were 
The  First  Book  of  PET  and  The  First 
Book  of  ATARI. 


UPDATE:  The  OSI  (Ohio  Scientif- 
ic), AIM,  KIM,  and  SYM  computers 
are  long  gone.  Single-board  comput- 
ers were  literally  computers  on  a 
board.  For  example,  the  SYM  was  a 
computer  on  a  circuit  board  that  fea- 
tured a  hexadecimal  keyboard  and 
an  LED  alphanumeric  display.  As 
the  price  of  home  computers  went 
down,  the  SBCs  disappeared.  Com- 
pute U  covered  the  SBCs  while  COM- 
PUTE! covered  home  computers.  In 
the  early  days,  COMPUTE!  was  di- 
vided into  "Gazettes,"  each  of 
which  covered  a  different  computer. 


June  1984 

ioThL^siro^^'^e::^^ 

;rhy?  If  they  have    wm."?  ^^^-20^-  If  so, 
CommodoreW;erdCdt:r:t:?,^"^ 

^ni  third.party  software  andh/- '^°"''"°'^'>'' 
computers  should  alsTco,ZtA  t'""'''  ^°'  ^°^^ 
some  time.  continue  to  be  available  for 

'"''''on  VIcZlteiT''  "'''  "''  -^  ^-0 


§ 


UPDATE:  We  later  found  out  that 
just  as  we  were  answering  this  ques- 
tion, Commodore  stopped  manufac- 
turing VICs.  Today,  64s  are  still 
going  strong.  At  last  count,  over  sev- 
en million  have  been  sold. 
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Ocfober  J  983 

1„S  «•"  P^ '"eWon"  Ho»  many  pages  cai. 
Here  area  few  ques».»^^^_,^^,„j5,o, 

.„  Epson  MX-80  .en»  P™«  '"so^L.rfac! 
400  with  or  without  tne  Ata.  ^^  Hallinan 

estimafe.  .         ,     ,  jK  for  the  'i'''^*^'' 

store  the  programs  "'^i^^f,  ,„„  ce-tfromcs  pa«"^' 

You  can  attach  "■'""^'f^  Atari  ^ia  the  Atari 

or  RS-232C  serial  pr.n..ro*^^f«;^  ^^^5  aO- 

S?J;:;£rr:ot^;rtheS50,ho.e.r. 


UPDATE:  SpeedScript  historians 
take  note,  Scriptor  was  Charles  Bran- 
non's  first  published  ancestor  of 
SpeedScript,  versions  of  which  even- 
tually appeared  for  the  64,  VIC,  Ap- 
ple, and  Atari  computers. 


^^^"''.    S  i^  '^'^''^  This  P^^^'^-nf^'^''*'  "^  the 
.ain<^^^^^  L  screen.  ^"^Vor  co «*•"?'  ^,hle  on  t^^^ 

Wll^^^  ^  the  SOti^  P""^    IgflSt.  ^ 

di^P"'^' .er«l  daV^'  "'  Illlllll 


— Compiled  by  Rhett  Anderson,  Assistant  Editor 


June  1982 

/  have  a  quest,-        Z  "         ~ 

■  '-''1'  J  have 


UPDATE:  In  attempting  to  fix  this 
bug,  Atari  accidentiy  made  it  worse. 
Version  A  of  BASIC  (in  the  400,  800, 
and  1200XL)  had  the  original  bug. 
Version  B  (in  the  600XL  and  800XL) 
had  a  related  bug  that  could  crash 
the  computer  when  you  entered  a 
line  (not  just  when  you  edited  or 
deleted  one.)  Version  C  (in  the  65XE, 
130XE,  and  XE  Game  System)  cor- 
rected the  bugs. 


June  198S 

Commodore  11        """^''  '^""Sed  toiyny  ^''^ 
possible  to  Ml  ]r-  Co^'^etically,  irs'j, 

sharper  on  thJ^Vyn-,    '^^^o^uHon  appears  .i' tf 

Commodore  ahnZ  l^'''  P^'^'omed  use  I 
essentially  a  17m      ■T'^'  ^^e  W  Color  ^^'^  ■ 
nnediomatlli  l'!^  "  'harcoal-^Z^^^'^'for, 

Eorh         "^  ^he  1902  Rnm/n    "^  Monochrome 
^°"""odore  128.  ^ES  m  support 


UPDATE:  Commodore  recently 
changed  the  name  of  another  moni- 
tor. The  Amiga  1080  evolved  into 
the  Commodore  1084  so  that  it 
could  be  sold  with  the  Commodore 
128  and  Commodore  PCs,  as  well  as 
with  the  Amigas. 


^^^''> 

11 
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Reviews 


GBA  Championship  Basketball: 
Two-On-Two 


James  Trunzo 

Requirements:  Apple  Ucs  (reviewed  here), 
512K  required;  Commodore  64;  Amiga: 
Atari  ST;  Apple  11;  IBM  PC,  XT,  AT,  and 
true  compatibles  with  256K  and  CCA 
card. 


Remember  the  way  One-o>i-One  burst 
onto  the  scene  when  Electronic  Arts 
released  its  basketball  arcade  simula- 
tion, featuring  Larry  Bird  and  Julius 
Erving?  Even  today,  years  after  its  re- 
lease, One-on-One  remains  a  popular 
diversion  and  graphic  pleasure.  Acti vi- 
sion's newest  release  doubles  the  plea- 
sure and  the  fun  by  adding  one  (player, 
that  is)  to  each  side  and  getting  GBA 
Championship  Basketball:  Two-oii-Tivo. 
Tiuo-on-Two  is  a  delightful  game 
whether  you're  playing  or  just  watch- 
ing. It  can  be  played  with  either  key- 
board or  joystick  and  can  be  played  in 
any  number  of  ways:  one  player  against 
the  computer,  two  players  against  a 
computer  team,  or  two  players  against 
each  other.  Additionally,  the  game  al- 
lows the  player  to  practice  (and  engage 
in  delightful  games  of  Around  the 
World  and  Horse),  play  an  exhibition 
game,  or  start  a  full  season  by  compet- 
ing in  a  24-team,  four-division  tourna- 
ment that  climaxes  with  the  GBA 
Championship  game. 

How  Good  Are  You? 

After  making  initial  choices  from  the 
graphic  chalkboard  that  serves  as  a 
menu,  players  create  their  on -court  per- 
sona by  adjusting  their  ratings  on  the 
Scouting  Report  screen.  Here,  qualities 
are  grouped  in  sets  of  two,  and  you  can 
allot  eight  points  to  each  pair:  inside 
and  outside  shooting,  dribbling  and 
quickness,  and  stealing  and  jumping.  If 
you  set  your  inside  shooting  ability  at  5, 
then  your  outside  shot  must  be  set  at  3. 
These  initial  ratings  determine  the  type 
of  player  you  are  on  the  court. 

One  other  choice  is  made  at  the 
Scouting  Report  screen,  that  being  the 
race  of  your  player.  Incidentally,  the  fact 
that  you  can  vary  your  player  type  brings 


vrith  it  a  tremendous  variety  in  game 
play.  In  one  game,  you  can  be  the  slick, 
ball-hawking  guard  with  the  great  out- 
side shot;  in  another  game,  you  can  be 
the  strong  rebounding  front-court  man 
v«th  a  deadly  short  hook  and  slam  dunk. 

Magic  Or  Larry? 

After  selecting  your  own  qualities,  your 
next  major  choice  is  that  of  a  partner 
with  whom  to  play.  Ten  superstar 
teammates  are  available,  and  all  ten  are 
patterned  after  famous  NBA  players, 
For  example,  select  Kareem  Ugrin,  and 
you  get  a  partner  with  a  great  inside 
shot  who  can  also  hit  the  boards.  Select 
Oscar  Dunbar,  and  your  partner  will 
score  inside  and  out  and  pass  brilliantly 
but  seldom  be  a  force  under  the  boards. 
Then  there's  Larry  Berg,  Magic  Lyndon, 
and  others  to  provide  you  with  more 
enjoyment  and  variety. 

But  choosing  a  teammate  isn't  to  be 
taken  lightly;  he  should  complement 
the  type  of  player  you've  created  for 
yourself.  For  example,  if  you're  strong 
on  the  boards  with  a  good  inside  shot, 
you  might  pick  a  partner  who  can  score 
from  the  outside  and  play  strong  defense. 

The  Ttp-Off 

The  real  fun  begins  when  the  roar  of  the 

crowd  goes  up,  the  buzzer  sounds  to 
begin  the  game,  and  the  dribbling  of  the 
ball  echoes  throughout  the  arena. 

Offensively,  you  can  choose  from 
one  of  five  play  patterns;  defensively, 
you  can  set  up  in  one  of  four  different 
ways.  Select  your  play  and  be  on  your 
toes  because  this  is  as  close  as  you  can 
get  to  the  intensity  of  two-on-two  bas- 
ketball without  sweating. 

The  animation  is  superb,  Players 
and  their  moves  are  sharply  defined, 
and  there  is  no  problem  discerning 
when  a  player  is  making  his  move.  Be 
quick  though.  Your  opponent  can  antic- 
ipate your  passes  and  pick  them  off  or 
time  your  jump  and  block  your  shot.  All 
the  nuances  of  basketball  are  faithfully 
reproduced  in  Two-on-Two.  You  must 
position  yourself  for  rebounds,  time  the 
release  of  your  shots,  and  pass  quickly 
to  the  open  player  if  you  expect  to 


Two-on-Two  offers  outstanding  graphics, 
animation,  and  playability. 

compete  with  the  computer. 

Additionally,  there  are  included  all 
the  violations  you  can  think  of — for 
both  teams,  thankfully.  Move  your 
player  into  an  opponent  after  he's  es- 
tablished position,  and  you'll  get  called 
for  charging.  Send  your  teammate  un- 
der the  basket  and  let  him  stand  there 
without  the  ball,  and  hear  the  buzzer 
sound  for  a  lane  violation.  Watch  a 
three-second  violation  result  in  a  turn- 
over. Fail  to  release  the  ball  after  going 
up  with  it  for  a  shot,  and  you've  traveled. 
Fouls,  timeouts,  fakes,  and  three-point 
shots — they're  all  part  of  Tiuo-on-Two. 

Check  Out  Those  Stats 

When  the  game  is  over,  the  screen  turns 
into  the  sports  page  of  the  Gamestar 
Gazette,  and  you  can  read  all  about  it.  A 
full  statistical  summary  is  displayed: 
field  goals  made,  shooting  percentage, 
rebounds,  steals,  blocked  shots,  assists, 
and  fouls  for  each  player.  The  leading 
scorer  gets  his  name  emblazoned  at  the 
top  of  the  page,  and  (of  course)  atten- 
dance is  announced. 

Two-on-Two's  graphics  are  excel- 
lent; each  player  displays  a  wide  range 
of  moves,  both  inside  and  out;  the 
sound  effects  are  realistic;  and  the  game 
play  itself  is  smooth  and  challenging.  I 
thought  perhaps  the  play  selection 
would  become  repetitive,  and  that  the 
computer  players  would  become  pre- 
dictable— and  they  do  on  occasion.  Re- 
petitive patterns  occur  at  random,  but 
by  the  time  you  realize  that  they  are 
occurring,  you've  lost  the  opportunity 
to  exploit  them. 

A  final  note  before  the  next  tip-off; 
The  IIgs  version  requires  the  new  2.0 
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ROM  chip  to  ensure  game  play.  If  your 
GS  still  contains  the  old  ROM,  Two-on- 
Two  may  bomb  at  any  time  during  play, 
although  you  might  get  lucky  and  play 
several  games  before  this  unpredictable 
bug  fouls  you  out  of  the  contest.  Time 
now  to  take  off  the  sweats.  Tivo-on-Two 
is  a  classic  that  will  keep  calling  you  to 
center  court. 

GBA  Championship  Basketball: 

Two-on-Two 

Activision 

2350  Bay  shore  Pkwy. 

Mountain  View.  CA  94043 

$34.95  Commodore  64  version 

$39.95  Apple  11  and  Atari  ST  versions 

$42.95  IBM  PC  and  compatibles  version 

(includes  S'/j-  and  3'/7-inch  disks) 

$44.95  Apple  IlGS  and  Amiga 

versions 


Beyond  Zork 

James  V.  Tninzo 

Requirements:  IBM  PC  and  100-percent 

compatibles;  Apple  tl  series  (including 
GS);  Macintosh;  Amiga;  Commodore  128. 
Some  game  features  unavailable  on  some 
computers. 

Certain  venerable  software  titles  in- 
stantly conjure  images  of  the  early  days 
of  computer  gaming.  Mention  Pac-Man 
or  Space  Invaders  and  one  immediately 
recalls  countless  hours  of  mindless  but 
enjoyable  entertainment.  Wax  nostalgic 
about  Wizardry/,  and  computer  adven- 
turers tend  to  gaze  into  the  distance, 
recollecting  their  climactic  encounter 
with  Werda.  Then  mention  text  adven- 
tures and  see  what  title  springs  to  mind. 
There  can  be  only  one — and  it  is  Zork. 
Now,  years  after  Zork  III,  the  final 
saga  of  the  Zork  Trilogy,  comes  yet  an- 
other text  adventure  spawned  from 
those  early  classics  and  resurrecting  the 
beloved  title  of  its  forebears.  This  new 
adventure  continues  the  legend  and  at 
the  same  time  advances  the  genre. 
From  Infocom  comes  the  latest  in  inter- 
active fiction;  Beyond  Zork.  And  lest  you 
think  that  this  is  just  an  extension  of  a 
tried-and-true  theme,  read  on. 

The  Next  Stage 

Beyond  Zork  introduces  the  next  stage  in 
interactive  fiction,  blending  the  rich- 
ness of  the  standard  text  adventure 
with  the  uniqueness  of  role  playing.  No 
longer  are  you  faced  with  just  solving 
the  intricate  puzzles  that  are  the  trade- 
mark of  Infocom  games;  no  longer  is 
the  character  in  the  adventure  one  di- 
mensional. Now,  you  must  design  your 
own  character,  determining  which  attri- 
butes you  wish  to  emphasize:  size,  dex- 


terity, strength,  intelligence,  luck,  or 
compassion.  Choose  wisely:  You'l!  lit- 
erally live  or  die  with  your  selections. 
Beyond  Zork  places  you  in  the  land 
of  Quendor,  sending  you  on  a  quest  for 
the  fabled  Coconut  of  Quendor,  an  arti- 
fact so  powerful  that  it  alone  can  pre- 
vent evil  from  dominating  the  land.  If 
the  theme  sounds  familiar,  even  trite, 
you  needn't  worry.  Your  adventure  will 
be  anything  but  commonplace.  Traps, 
puzzles,  and  monsters  appear  with  ex- 
citing regularity,  and  the  game's  inter- 
face is  fresh  and  new. 

Innovative  Features 

Besides  the  role-playing  element.  Be- 
yond Zork  contains  so  many  innovative 
features  that  if  it  weren't  for  the  rich- 
ness of  the  text,  you  might  not  recog- 
nize the  product  as  having  come  from 
Infocom.  To  begin  with,  the  screen  pre- 
sentation is  unlike  any  other  Infocom 
game.  It  provides  the  user  with  more 
information  than  ever.  For  example, 
onscreen  mapping  offers  you  help  in 
determining  where  you  are,  where 
you've  been,  and  where  you  might  go. 
The  map,  however,  shows  only  a  small 
area  of  Quendor,  so  mapping  skills  are 
still  necessary. 

In  the  Apple  II  version,  the  status 
line  no  longer  shows  a  point  score: 
Instead,  it  displays  your  ever-changing 
characteristics  as  well  as  your  current 
character  level.  Wounds  reduce  your 
endurance;  potions  increase  or  decrease 
your  strength.  If  you  want  to  see  your 
intelligence  take  a  dive,  type  a  profanity 
and  watch  what  happens.  What  about 
the  text?  Dialog  boxes  now  hold  the 
information  that  normally  commanded 
98  percent  of  the  screen. 

Another  feature  making  its  debut  in 
Beyond  Zork  is  the  use  of  function  keys. 
Previous  games  allowed  the  user  to  take 
a  shortcut  by  pressing  one  key  to  repre- 
sent a  word  (N  for  north,  for  example). 
In  Beyond  Zork,  you  can  now  define  a 
single  keystroke  to  represent  an  entire 
sentence.  For  example,  you  can  create 
what  amounts  to  a  macro  for  the  com- 
mand/4f  fact  (ftffmo«s(erK;if/ii/owrsii'orrf. 
From  that  point  on,  simply  press  a  key  to 
carry  out  that  particular  command.  The 
game  comes  with  function  keys  pro- 
grammed with  the  most  commonly  used 
commands;  however,  any  or  all  of  the 
default  commands  can  be  changed. 

Seven  new  commands  make  their 
first  appearance  in  Beyond  Zork: 
COLDR  allows  you  to  change  the  col- 
ors on  your  screen.  DEFINE  lets  you 
create  the  macros  discussed  above. 
MODE  allows  you  to  make  the  screen 
look  like  the  standard  Infocom  screen, 
if  the  maps  and  other  features  distract 
you.  MONITOR  automatically  moni- 
tors your  character's  endurance,  which 


is  the  most  important  characteristic  be- 
cause it  determines  if  you're  alive  or 
dead,  and  NAME  lets  you  give  a  name 
to  items  and  living  things.  You  can 
name  your  weapon,  for  example,  and 
Beyond  Zork  will  use  that  name  in  its 
descriptions.  NOTIFY  is  like  MONI- 
TOR, except  it  tracks  all  other  attributes. 
UNDO  allows  you  to  back  up  one  move. 
ZOOM  allows  you  to  see  more  mapped 
area  on  your  screen  but  in  less  detail. 
(Note:  the  UNDO  command  is  not  avail- 
able on  the  standard  Apple  tl  version.) 

Land  Ot  Plenty 

It's  easy  to  see  that  Beyond  Zork  is  aptly 
named.  The  new  screen  appearance  and 
the  plethora  of  new  commands  speak 
for  themselves  as  worthy  additions  to 
text  adventure  programs.  These  features 
alone  would  be  more  than  enough  to 
satisfy  jaded  game  players,  but  Infocom 
has  added  trimmings  to  this  feast  by 
making  Beyond  Zork  its  largest  program 
yet.  Beyond  Zork  spans  an  area  at  least 
four  times  the  size  of  any  existing  text 
adventure,  giving  you  a  huge  land  in 
which  to  develop  your  character. 

More  frills?  Certainly.  This  is  Info- 
com, after  all.  A  beautifully  done,  illus- 
trated handbook  titled  "The  Lore  and 
Legends  of  Quendor"  provides  impor- 
tant information  on  the  beasties  (plant 
and  animal  alike)  that  inhabit  Quendor, 
as  well  as  well-disguised  hints  on  deal- 
ing with  these  obstacles  to  your  success. 
Also,  a  map  of  the  Southland  of  Quendor 
provides  a  useful  overview  of  the  world 
in  which  you  are  about  to  adventure. 

A  final  note:  Beyond  Zork  is  avail- 
able for  a  wide  variety  of  machines,  and 
while  most  of  the  information  in  this 
review  holds  true  no  matter  which 
computer  is  used  to  play  the  game, 
certain  versions  contain  even  more  fea- 
tures, especially  in  the  area  of  graphics. 
For  example,  the  Amiga,  IBM,  Macin- 
tosh, and  IIgs  versions  allow  the  use  of 
a  mouse  to  move  from  area  to  area  on 
the  onscreen  maps.  All  of  the  above 
machines — as  well  as  the  Commodore 
128 — use  colorful  bar  charts  to  display 
attribute  levels.  Also,  some  systems 
allow  up  to  four  colors  on  the  screen  at 
one  time,  as  opposed  to  the  two-tone 
screens  of  less-sophisticated  systems. 

Regardless  of  which  machine  is 
used  to  play  Beyond  Zork,  the  result  will 
be  the  same:  hours  of  enjoyment.  High- 
ly recommended.  Beyond  Zork  reaffirms 
Infocom's  position  as  king  of  the  text 
adventures. 

Beyond  Zork 

Infocom 

125  Cambridge  Park  Dr. 

Catnbridge,  MA  02140 

$49.95  IBM  PC/compatibles,  Apple  11, 

GS,  Macintosh,  and  Amiga  versions 

$44.95  Commodore  128  version 
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3-D  Helicopter  Simulator 


Ervin  Bobo 

Requirements:  Any  IBM  PC,  XT,  AT,  Per- 
sonal System/!,  or  compatible  with  at 
least  256K;  runs  with  EGA,  CGA.  or  Her- 
cules graphics  cards.  The  game  includes 
an  option  that  permits  play  via  modem 
(1200  baud)  or  betiveen  linked  computers. 

To  date,  the  best  helicopter  simulators 
have  placed  an  emphasis  on  accuracy  in 
the  control  panel  and  the  flight  controls 
of  the  craft  (within  home  computer  lim- 
itations), while  getting  by  with  a  land- 
scape that  can  at  best  be  considered 
generic. 

3-D  Helicopter  Simulator  from  Sierra 
turns  that  trend  around  by  providing 
you  with  a  generic  helicopter,  while 
taking  pains  to  give  you  authentic  land- 
scapes over  which  to  fly  and  fight. 
There  is  both  good  and  bad  in  this 
approach;  I'll  try  to  take  the  features 
one  at  a  time. 

Since  they  did  not  opt  for  a  catchy 
title  like  Gunhawk,  Whirlybird,  or  Ro- 
tary Death,  1  assume  that  the  scenery 
and  the  ability  to  share  airspace  via  a 
modem  link  were  always  foremost  in 
the  minds  of  the  creators.  The  helicop- 
ter itself  is  almost  an  afterthought.  No 
matter,  for  it  lifts  into  the  air  and  goes 
places,  and  that  is  about  all  you  need. 

Realistic  Scenery 

You  fly  over  scenic  places  that  are  as 
good  as  the  views  in  Microsoft's  Flight 
Si)?iulator — perhaps  even  better  in  some 
instances,  for  the  3-D  objects  are  solid 
rather  than  wire-frame.  Seattle's  Space 
Needle  is  convincing,  and  Los  Angeles, 
seems  shrouded  in  smog.  Further,  note 
that  a  good  part  of  the  excitement  in  the 
movie  Blue  Thunder  was  generated  by 
deadly  helicopter  battles  taking  place 
over  a  major  city,  and  some  of  that 
same  excitement  is  present  in  Helicopter. 

Because  the  scenery  in  some  flight 
areas  is  denser  than  in  others — thus 
causing  a  slower  screen  updating — 
these  areas  are  indicated  on  the  menu 
with  an  asterisk.  The  idea  is  that  you 
should  fly  these  skies  at  your  comput- 
er's "turbo"  speed  or  be  prepared  for  a 
slow  flight.  This  is  good  thinking  on  the 
part  of  Sierra,  and  [  wish  other  produc- 
ers of  simulators  would  do  the  same. 

Other  scenery  areas  include  Space- 
port U.S.A.  (where  I  blew  up  the  Vehicle 
Assembly  Building),  Houston,  Port  City, 
Yosemite,  and  Farmland.  The  first  three 
are  dense  scenery  areas.  If  you're  going 
to  tr)'  to  emulate  Blue  Thunder,  I'd  rec- 
ommend you  do  it  in  Houston  or  Port 
City,  both  of  which  consist  of  half  a 
dozen   buildings.    Farmland   is   mostly 


trees  and  a  heliport;  Yosemite  is  two 

mountains  and  a  heliport;  and  Los  Ange- 
les is  two  or  three  buildings  near  the 
airport. 
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3-D  Helicopter  Simulator  offers  head- 
to-head  competition  via  modem. 


Fly  Around  It 

Though  the  structures  are  solid  3-D 
graphics,  the  documentation  states  that 
certain  compromises  in  programming 
make  it  possible  to  fly  through  some  of 
these  structures,  but  not  all  of  them. 
Make  it  a  point  to  fly  around  everything. 

Control  of  the  craft  is  by  keyboard 
or  by  a  combination  of  keyboard  and 
joystick.  Pushing  the  N  and  M  keys 
controls  ascending  and  descending, 
and  your  joystick  or  numeric  keypad 
controls  the  direction  of  movement. 

Because  the  Helicopter  is  generic 
and  follows  no  set  form,  your  arma- 
ment consists  of  60  unspecified  mis- 
siles. Since  I  consistently  have 
destroyed  buildings  and  only  occasion- 
ally destroyed  an  enemy  chopper,  I'm 
pretty  sure  these  missiles  are  unguided, 
as  well  as  unspecified.  Press  the  space 
bar,  and  you'll  see  a  black  triangle  mov- 
ing out  from  your  ship.  When  it  impacts 
with  something,  there  is  a  soundless 
explosion  that  is  indicated  by  multiple 
crosses,  somewhat  like  stylized  fracture 
lines.  Since  combat  is  one  of  the  main 
reasons  for  having  the  program,  I  wish 
these  routines  had  been  better  realized. 

Combat  By  Modem 

In  combat,  you  can  contend  against  the 
computer  or  against  a  friend  on  another 
computer.  A  main  feature  of  Helicopter 
is  the  head-to-head  combat  against 
friends  who  are  connected  to  you  by 
modem  and  who  also  own  a  copy  of  the 
program  (though  it  isn't  necessary  they 
have  the  same  computer),  I  can  see 
where  this  could  be  a  lot  of  fun,  especial- 
ly when  playing  tag  among  the  canyons 
of  a  city,  but  with  combat  routines  that 


are  both  slow  (even  at  turbo  speed)  and 
noiseless,  quite  a  bit  is  left  to  be  desired. 

There  is  also  more  to  be  desired  in 
the  way  of  graphics.  As  noted  above, 
the  scenery  is  impressive,  the  control 
panel  is  well  done  and  easy  to  read,  but 
the  aircraft  graphics  are  disappointing. 
By  switching  views,  you  can  watch 
yourself  fly  from  Ground,  Tracking,  or 
Satellite  viewpoints,  but  there  really 
seems  little  point  in  doing  this.  All  you 
will  see  is  a  box  with  what  might  be  an 
attached  rotor. 

The  numeric  keypad  provides  cock- 
pit views  in  eight  directions,  and  this  is 
one  of  the  niceties  of  3-D  scenery. 
When  you  fly  past  a  building,  you  can 
switch  to  a  rear  view  and  see  it  receding 
in  the  distance.  Further,  since  all  objects 
on  the  console  radar  screen  are  white 
blocks,  switching  viewpoints  tells  you 
whether  an  object  is  a  building  or  an 
enemy  chopper. 

Strategy 

In  summation,  I  think  the  chief  excite- 
ment of  3-D  Helicopter  is  the  ability  to 
strategically  use  solid  structures  for 
evasion  and  concealment  during  com- 
bat, either  against  the  computer  or 
against  a  friend  on  the  other  end  of  a 
modem  link.  The  trade-off  for  the  scen- 
ery is  a  reduced  speed  in  screen  updat- 
ing, thus  slowing  the  apparent  speed  of 
the  helicopter  and  making  the  move- 
ment somewhat  choppy.  Though  the 
sound  is  less  than  satisfactory  and  the 
shapes  of  the  choppers  anything  but 
aerodynamic,  I  realize  some  of  this  is 
due  to  the  limitations  of  the  PC  itself 
and  not  to  shortcuts  in  programming. 

Documentation 

Documentation  is  good  and  complete 
without  being  overbearing,  and  there  is 
a  rather  large  quick-reference  card  to 
help  you  sort  out  the  many  keyboard 
commands.  Most  of  these  have  to  do 
with  invoking  options  rather  than  con- 
trolling the  craft.  3-D  Helicopter  Sinnila- 
tor  runs  on  the  IBM  PC  and  PCjr,  as 
well  as  Tandy  and  other  MS-DOS  com- 
puters with  256K  or  more.  It  supports 
CGA,  EGA,  or  Hercules  graphics  cards, 
can  be  installed  on  a  hard  disk  (though 
the  floppy  will  be  required  as  a  key  disk 
during  booting),  and  also  supports  100- 
percent  Hayes-compatible  modems.  As 
currently  available,  the  package  contains 
both  a  5 '/4-inch  and  a  3y2-inch  disk. 

3-D  Helicopter  Simulator 

Sierra  On-line 

Sierra  On-line  Building 

P.O.  Box  485 

Coarsegold,  CA  936U 

$39.95 
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New  Apple  IIGS 

Books  from  COMPUTE! 


Easy-to-use  tutorials  and  ready-to-typ©-in  programs  show  you  how  to  get  more 
from  your  Apple  llGS — from  booting  up  the  machine  and  programming  In  ma- 
chine language  to  utilizing  the  advanced  sound  and  graphics  capabilities,  Writ- 
ten in  COMPUTEI's  clear,  concise  style,  these  books  contain  all  the  information 

you  need  to  access  the  power  of  your  llGS, 


Using  Deluxe  Paint  II 

Steven  Anzovin 

ISBN  0-87455-1 11-0  SI  8.95 

Create  the  most  spectacular  ort  possible  on  a  personal  computer 
with  this  comprehensive,  yet  understandable,  guide  to  Deluxe  Paint 
II.  the  state-of-the-art  graphics  program  for  the  Commodore  Amiga 
and  Apple  IIgs.  Simple  drawing  skills,  customizing  brushes,  sophis- 
ticated palettes,  special  color  effects,  tools,  styles,  patfeming,  and 
perspective  are  just  some  of  the  techniques  illustrated.  Learn  how  to 
use  ever/  feature  of  Deluxe  Paint  II,  from  merging  foreground  and 
background  to  mixing  graphics  and  text.  A  COMPUTEI  Library 
Selection. 

COIVlPUTEI's  Guide  to  Sound  and  Graphics  on  the 
Apple  lies 

William  B.  Sanders 

ISBN  0-87465-096-3  $16.95 

The  impressive  new  machine  from  Apple  holds  the  promise  of  daz- 
zling graphics  and  symphonic  sound — if  you  know  how  to  use  them. 
This  tutorial,  by  the  author  of  The  Elementary  Apple  IIgs,  begins  by 
showing  how  to  create  graphics  and  sound  using  Applesoft  BASIC, 
but  it  doesn't  stop  there.  The  book  includes  a  multitude  of  programs, 
routines,  and  utilities  with  which  you  can  open  the  IIgs's  Toolbox,  a 
sophisticated  set  of  programming  tools,  so  that  you  can  produce 
truly  amazing  sights  and  sounds.  A  COMPUTEI  Library  Selection. 


The  Elementary  Apple  IIgs 

William  B.  Sanders 
ISBN  0-87455-072-6  $15.95 

A  friendly,  easy-to-use  guide  to  the  newest  Apple  computer, 
this  book  leads  you  through  the  steps  of  connecting  the  com- 
puter, loading  programs,  creating  graphics,  and  writing  pro- 
grams. For  both  novice  and  seasoned  programmers,  it's  an 

Introductory  text  for  everyone. 

COMPUTEI's  Apple  IIgs  Machine  Language 

for  Beginners 

Roger  Wagner 
ISBN  0-87455-097-1  S19.95 

The  latest  In  a  series  of  introductory  machine  Sanguage  books, 
COt^PUTEI's  Apple  IIGS  Moc/i/ne  Language  for  Beginners  Is  a 
clear  ond  concise  tutorial  to  learning  the  IIgs's  native  language. 
Written  by  noted  Apple  columnist  Roger  Wagner,  this  book  in- 
cludes many  programming  examples  and  clear  explanations 
that  moke  learning  65816  machine  language  easy.  For  begin- 
ning and  intermediate  machine  language  programmers  as  well 
OS  those  who  know  another  machine  language  and  want  to 
move  up  to  this  fast  16-blt  language.  A  COMPUTEI  Library 

Selection. 


THE 

ELEMENTARY 
APPLE  UGS 

Atnribk 


COMPUTEI  Publiccftbnsjnc^ 

Port  at  ABC  CoojLmw  MagoA>oi.  he  ^^^ 

Otw  OI  irm  ABC  PijUah^  Corfxr««i 

COMPUTE!  books  are  avallobte  outside  the  United  States  from 
sutjsidiones  of  McGraw-Hill  International  Book  Companv. 


Look  for  these  COMPUTEI  books  at  your  book  or  computer  store.  You  can  order  direct 

by  calling  toll  free  1-800-346-6767  (in  NY  212-887-8525)  or  by  writing  COMPUTE!  Books, 

Customer  Service,  P.O.  Box  503B.  F.D.R,  Station.  New  York,  NY  10150. 

Customer  Sen/ice  hours  are  10:00  a.m.-12:30  p.m.  and  1:30  p,m.-3:00  p.m.  EST. 

Please  include  32.00  per  book  for  US,  or  surfoce  mail  or  $5.00  for  airmail. 
NC  residents  please  add  5  percent  sales  tax  and  NY  residents  odd  8.25  percent  sales 

tax.  Please  allow  4-6  weeks  for  delivery, 


Printrix 

Ervin  Bobo 

Requirements:  Apple  Ue  with  80-column 
card  and  128K  memory,  or  Apple  He;  IBM 
PC,  XT,  AT,  or  compatible,  with  256K. 
(Apple  version  reviewed  here;  IBM  ver- 
sion differs  in  some  respects.) 

Printrix  is  a  program  that  offers  a  nice 
midway  step  between  word  processing 
and  desktop  publishing.  Unlike  too 
many  programs  lately,  this  one  doesn't 
pretend  to  be  a  full-fledged  desktop 
pubhsher.  Printrix  is  an  interim  pro- 
gram— its  subtitle  is  Personal  Typsetting 
Software — that  succeeds  at  what  it  sets 
out  to  do. 

Printrix  formats  text  from  an  out- 
side source  into  a  variety  of  fonts.  Layout 
is  accomplished  through  a  simple  but 
very  complete  formatting  menu  in  which 
paper  size,  margins,  tabs,  justification, 
linefeeds,  and  page  numbering  are  set 
from  an  easy-to-use  onscreen  listing. 

Type  Styles  And  Sizes 

The  text  can  then  be  enhanced  via  Print- 
rix's  different  print  styles  and  sizes.  The 
program  also  is  able  to  read  fonts  from 
its  cousin,  Fontrix.  Printrix  comes  with 
15  fonts,  or  type  styles,  ranging  in  size 
from  15  to  70  points.  The  largest  type 
size  produces  screaming  headlines;  in- 
between  sizes  can  be  used  for  subhead- 
ings; and  15-point  type  produces  print 
somewhat  larger  than  you  are  accus- 
tomed to  seeing  on  normal  printed  pages. 

This  last  characteristic  I  consider 
one  of  the  package's  few  shortcomings: 
Printrix  would  be  even  more  usable 
with  a  few  fonts  in  the  eight-  to  ten- 
point  range. 

Since  Printrix  is,  in  essence,  a  graph- 
ics printing  program,  the  number  of  fonts 
available  to  you  does  not  depend  upon 
the  number  built  into  your  printer.  The 
only  necessity  is  that  your  printer  must 
have  the  ability  to  print  graphics. 

Individual  fonts  can  be  reconfi- 
gured from  a  Change  Font  Parameters 
menu.  This  feature  lets  you  select  pro- 
portional printing,  spacing  and  linefeed 
gaps,  italics,  and  other  typesetting  tools. 

(In  a  similar  manner,  Printrix  al- 
lows the  use  of  graphics  in  your  pub- 
hshed  work.  Several  are  included  with 
the  program,  and  you  may  also  use  clip 
art  from  programs  such  as  Print  Shop.) 

Text  From  All  Over 

Files  from  almost  any  word  processor 
may  be  used.  Printrix  supports  Apple- 
Works, AppleWriter,  Word  Juggler,  and 
WordPerfect.  For  other  word  processors, 
Printrix  reads  files  saved  in  standard 
ASCII  ProDOS  format.  (ASCII  files  cre- 


ated with  DOS  3.3  have  to  be  converted 
to  ProDOS  files  before  they  can  be  read.) 

It's  a  simple  matter  to  print  a  file 
with  Printrix.  The  Text  Formatting 
screen  tells  you  the  page  size  and  then 
tells  you  to  select  one  of  the  four  fonts 
on  the  program  disk.  (Two  double-sided 
disks  are  included  with  Printrix.  One 
holds  the  program  and  fonts;  the  other 
holds  Configuration  and  more  fonts. 
The  second  disk  contains  fonts  on  both 
sides,)  This  will  print  a  document  using 
only  one  font,  but  the  program  is  capa- 
ble of  much  more  than  that. 

When  you  start  using  Printrix,  the 
configuration  program  prompts  you  for 
details  as  to  your  computer,  printer, 
interface  card,  word  processor,  and  so 
on.  This  information  is  saved  to  the 
program  disk,  ensuring  that  subsequent 
startups  automatically  configure  the 
program  to  your  system. 

Fonts  And  Features 

Through  the  use  of  commands  embed- 
ded in  your  word  processing  file,  it  is 
possible  to  use  as  many  as  four  fonts 
per  line  and  an  unlimited  number  of 
fonts  per  page.  A  command  for  a  font 
looks  like  this:  'F=  1  (which  prints  the 
font  loaded  in  the  first  position)  or  ''f-2 
(which  switches  to  the  second  font). 
Since  there  is  no  command  for  turning  a 
font  off,  your  file  continues  in  font  2 
until  it  reaches  a  command  to  revert  to 
font  1, 

In  contemplating  the  use  of  multi- 
ple fonts,  be  aware  that  each  font  must 
be  read  into  memory  before  it  can  be 
used,  and  that  the  Font  Load  and  Text 
Formatting  routines  allow  for  only  four 
numbered  fonts  at  a  time.  To  take  the 
program  to  its  limits,  you  have  to  pause 
printing  while  changing  the  numbered 
font  designations  and  then  do  a  great 
deal  of  disk  swapping  to  load  those 
fonts  into  computer  memory. 

I  think  the  easiest  course  is  to  com- 
pose your  files  with  only  four  fonts  in 
mind:  one  for  headlines,  one  for  sub- 
headings, one  for  standard  text,  and 
one  special  font  for  calling  attention  to  a 
particular  item.  Things  will  also  go  easi- 
er if  you  plan  your  work  so  that  the  four 
chosen  fonts  are  all  on  the  same  side  of 
the  disk  or,  if  you're  using  two  disks 
drives,  on  only  two  disks. 

Start  Ttie  Presses 

Though  Printrix  will  work  vtnth  almost 
any  graphics  printer,  it  offers  an  extra 
feature  to  users  who  own  printers  with 
reverse  linefeed.  Should  you  be  one  of 
those,  you  may  choose  two-column 
printing  from  the  Text  Format  menu. 
Printrix  prints  the  first  column,  reverses 
your  paper  to  the  top  of  the  page,  and 
prints  the  second  column. 

If  you're  searching  for  the  news- 


print look  of  other  desktop  publishing 
systems,  two-column  printing  will 
bring  you  a  bit  closer,  but  keep  in  mind 
that  Printrix  has  no  system  for  dividing 
columns  with  lines,  as  do  other  news- 
print programs. 

On  balance,  I  find  Printrix  is  exact- 
ly what  it  says  it  is:  a  text-formatting 
program.  With  a  variety  of  fonts,  layout 
functions,  an  ability  to  incorporate 
graphics,  and  clear  documentation  that 
explains  how  to  put  it  all  together,  Print- 
rix allows  you  to  get  your  feet  wet  in 
desktop  publishing  and  perhaps  helps 
you  decide  whether  to  pursue  the  real 
thing  at  a  greater  expense. 

Whether  or  not  you  elect  to  go  all 
the  way,  Printrix  adds  some  attention- 
getting  visuals  to  whatever  you  have  to 
print:  letters,  reports,  broadsides,  or 
manifestos. 

Printrix 

Data  Transforms 
616  Washington 
Denver,  CO  80203 
$65  Apple  version 
$165  IBM  PC  version 
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Exciting  &  Neiv! 


Commodore  64/128  Books 

from  COMPUTE! 


COivlMuDORt 

64/128 
POWER 
BASIC 


COMPUTEi'sE 


THIRD  BOOK 

OF  coMNinnoKi':  04 

GAMES 


Get  more  power,  education,  and  relaxation  from  your  Commodore  64  or  128  witti  fhiese 

new  books  from  COMPUTE!.  And,  as  always,  the  programs  are  thoroughly  tested  and  easy 

to  enter  using  our  special  program  entry  system.  (Disks  are  available,  too.) 


COMPUTEI's  Commodore  64/128 
Power  BASIC 

Edited 

Collected  in  this  one  volume  are  more 
than  two  dozen  short  BASIC  programs 
from  COMPUTEI's  Gazette's  popular 
monthly  column,  "Power  BASIC,"  In- 
cluded are  utilities  that  add  an  8K  RAM 
disk;  read  and  write  to  disk  sectors: 
make  programs  read  joysticks  more 
quickly;  and  automatically  generate  line 
numbers.  There  are  also  programs  such 
as  "Stop  and  Go."  which  creates  a 
pause  button  to  temporarily  halt  a  pro- 
gram, and  "Time  Clock,"  which  puts  a 
digital  clock  on  your  screen,.  There  is  o 
companion  dist<  available  tor  $12.95 
which  includes  all  the  programs  from 
the  book.  (998BDSK) 
$16.95     ISBN  0-8  7455-099-8 


COMPUTEI's  More  Machine  Language 
Games  for  the  Commodore  64 

Edited 

Seven  of  the  best  machine  language 
games  for  the  64  have  been  gathered 
into  one  volume  in  this  follow-up  to  the 
popular  COMPUTEI's  Machine  Language 
Somes  for  the  Commodore  64.  Selected 
from  recent  issues  of  COMPUTE!  and 
COMPUTEI's  Gazette,  the  games  range 
from  the  frantic  "Prisonbail"  to  the 
delightfui  "Biker  Dave."  This  is  more  than 
just  a  collection  of  exciting  fast-action 
games,  though,  because  complete  and 
commented  source  code  for  each  pro- 
gram is  included  in  the  book.  Machine 
language  programmers  can  see  exactly 
how  each  game  is  written  and  what  de- 
sign techniques  are  used.  A  disk  Is  avail- 
able for  $12.95  which  includes  all  the 
programs  in  the  book,  including  source 
code.  (947BDSK). 
$16.95     ISBN  0-87455-094-7 

These  books  are  now  available  at  your  local  book  or  computer  store. 

You  can  also  order  directly  from  COMPUTE!  by  colling  toll  free  800-346-6767 

(in  NY  call  212-887-8525)  or  mailing  your  order  to  COMPUTE!  Books,  P.O.  Box  5038. 

F.D.R.  Station.  New  York,  NY  10150. 
Customer  Service  hours  are  10:00  a.m.- 12:30  p.m.  and  1:30  p.m. -3:00  p.m.  EST  Mon.-Fri. 

Please  include  S2.00  postage  and  handling  per  book  or  disk,  NC  residents  add  5  percent  sales  tax  and  NY  residents 
add  8.25  percent  sales  tax.  Pleose  allow  4-6  weeks  for  delivery. 


COMPUTEI's  Third  Book  of  Commodore 
64  Games 

Edited 

COIvlPUTE!  Pjjblications,  the  leading  pub- 
lisher of  programs  for  the  Commodore 
64,  has  brought  together  another  excit- 
ing collection  of  nerve-tingling  games 
that  will  delight  the  whole  family — from 
preschoolers  to  teenage  arcade  fans  to 
those  who  enjoy  games  of  logic.  Clearly 
written,  with  non-technical  instructions, 
this  book  contains  hours  of  challenging 
entertainment  for  beginning  computer 
fans  as  well  as  experienced  pro- 
grammers. There  is  a  companion  disk 
available  for  $12.95  that  includes  all  the 
programs  in  the  book.  (955BDSK). 
$15.95     ISBN  0-87456-095-5 


® 


CPS-500  Power  Supply  For  Amiga 


Scott  Thomas 

In  my  opinion,  the  Amiga  500  is  the 
ultimate  home  computer.  Dollar  for 
dollar,  the  500  delivers  more  process- 
ing, graphics,  and  sound  capability 
than  any  other  personal  computer  on 
the  market.  Building  on  the  knowledge 
and  experience  acquired  through  the 
development  of  the  Amiga  1000,  Com- 
modore has  produced  a  low-priced  but 
power-packed  computer.  Its  quality  of 
construction  is  for  the  most  part  good, 
but  the  power  supply  for  the  Amiga  500 
is  marginal,  at  best. 

Commodore  has  had  a  history  of 
problems  with  power  supplies  that 
dates  back  to  the  Commodore  64.  It 
seems  that  in  an  effort  to  make  its  home 
computers  competitively  priced.  Com- 
modore sacrifices  quality  in  its  power 
supplies.  This  continues  to  be  true. 
Many  purchasers  of  the  first  Amiga 
500s  off  the  assembly  line  were  greeted 
with  a  dead  power  source  within  min- 
utes of  power-up.  Although  Commo- 
dore has  corrected  the  problem,  the  new 
power  supply  still  is  taxed  to  its  limits  on 
a  500  equipped  with  the  internal  512K 
RAM  expansion  and  an  external  drive. 


Outside  Power  Source 

Fortunately,  numerous  third-party 
manufacturers  have  developed  hard- 
ware peripherals  for  the  Amiga  500 
even  though  the  500  has  only  been  on 
the  market  for  a  few  months. 

One  of  these  peripherals  is  the 
CPS-500  from  Phoenix  Electronics.  The 
CPS-500  is  a  replacement  or  alternate 
power  supply  that  provides  the  500 
with  more  than  enough  power  to  support 
an  external  drive  and  the  internal  512K 
RAM  expansion.  The  CPS-500  5V  rating 
is  6  amps,  which  is  1.7  amps  higher  than 
the  Commodore  power  supply. 

The  CPS-500,  however,  does  not 
stop  with  an  amp-rating  improvement 
alone.  The  power  supply  includes  three 
auxiliary  117  VAC  60  Hz  100- watt  recip- 
rocals with  transient/spike  suppression 
and  RFl  and  EMI  filtering.  The  unit  has 
a  five-amp  primary  fuse  accessible  from 
the  rear  of  the  unit. 

The  power  supply,  therefore,  acts 
as  both  the  power  supply  for  the  com- 
puter and  a  power  strip  for  your  Other 
peripherals,  such  as  your  monitor  and 
printer.  By  flipping  the  on/off  switch 


on  the  CPS-500,  you  turn  the  power  on 
for  all  of  your  computer  hardware.  The 
CPS-500  weighs  six  pounds  and  is  en- 
cased in  a  sturdy  metal  housing  that  can 
be  opened  for  servicing.  The  size  of  the 
unit  is  lOVi  inches  deep  by  6^/4  inches  in 
width  by  3  inches  in  height. 

A  Good  Investment 

With  all  of  its  superior  features  and  its 
one-year  warranty,  the  CPS-500  is  a 
wise  investment  for  owners  of  the 
Amiga  500.  Since  the  on/off  switch  for 
the  computer  is  on  its  power  supply, 
combining  the  power  supply  with  a 
fused,  spike-suppressed,  filtered  power 
strip  for  all  your  hardware  makes  good 
sense.  The  unit  is  well  constructed  and 
its  parts  are  easily  accessible  for  servicing. 
The  extra  amp  rating  of  the  CPS-5Q0 
can  mean  the  difference  between  star- 
ing at  a  blank  screen  or  high-powered 
processing.  I  highly  recommend  the 
CPS-500  to  all  Amiga  500  owners. 

CPS-500 

Phoenix  Electronics,  Inc. 

314  Court  St. 

P.O.  Box  156 

Clay  Center,  KS  67431 

$89.99  m 


PURE-STAT  BASEBALL 

PURE-SIAT  BASEBALL  is  a  complete  statistical 
baseball  simulation  for  zero,  one  or  two  players,  ttiat 
also  includes  a  built-in  STAT  COMPILER  and  a  prp- 
gram  to  TRADE  PLAYERS.  GAME  PLAY,  MANAG- 
ER'S DECISIONS,  GRAPHICS  and  a  complete  sta- 
lislical  librarv  establish  PURE-STAT  BASEBALL  as 
the  ULTIMATE  SPORTS  SIMULATION  program. 
PURE-S1AT  BASEBALL'S  underlyinQ  statistical 
framework  simulates  the  realities  of  baseball  lil<e 
never  before.  Wittiin  this  framework  the  program 
considers  each  PLAYER'S  BAniNG  STATISTICS 
AGAINST  both  LEFT  and  RIGHTHANDED  PITCH- 
ERS, along  wilti  the  graphics  and  attributes  of  every 
MAJOR  LEAGUE  STADIUM  from  the  optional  STA- 
DIUM DISK.  Every  PLAYER'S  FIELDING,  BASE- 
RUNNING  and  THROWING  ABILITIES  are  also  con- 
sidered. Optional  TEAM  DISKS  are  available. 


Rstall  price:  S39.95 

Available  tor;  Commodore  Mtm,  IBM  PC,  and  APPLE  I 


FOOTBALL 

FOOTBALL  Simulates  all  physical  aspects  of  the 
game  of  football  down  to  the  finest  detail,  while  you 
are  controlling  the  movement  of  key  players  on  the 
field.  For  one  or  two  players  FOOTBALL  sets  new 
standards  in  both  REALISM  and  PLAYABILITY  using 
an  overhead  3D  perspective  of  the  football  field  giv- 
ing full  view  of  all  22  animated  players.  Every  offen- 
sive receiver  and  running  back  has  different  Indi- 
vidual physical  attributes  (SPEED,  POWER,  AND 
CATCHING  ABILITY).  Each  player's  performance 
characteristics  help  you  determine  how  and  when 
to  use  that  player  most  effectively  Each  quarterback 
has  unique  abilities  for  SHORT,  LONG  or  FLAT 
PASSES,  and  linebackers  have  power  ratings  for 
tackling  ability. 
Hetall  price:  $29.95 
Available  for:  Commodore  64/128,  and  IBM  PC 


PURE-STAT  COLLEGE 
BASKETBALL 

PURE-STAT  COLLEGE  BASKETBALL  is  a  com- 
plete statistical  basketball  simulation  for  zero,  one 
or  two  players,  that  also  includes  a  STAT  COMPILE  R. 
The  game  uses  coaching  strategy  and  player  sta- 
tistics to  determine  the  outcome  of  each  play,  while 
graphically  depicbng  the  sequence  with  10  ani- 
mated players  on  a  basltetball  court.  The  game 
comes  with  20  all  time  great  college  teams  from 
past  and  present,  and  with  an  optional  CREATE 
TEAM  DISK  the  statistics  for  any  college  team  from 
any  division  can  be  entered. 
Retail  price:  $39.95 

Available  for:  Commodore  M/128,  IBM  PC,  and 
APPLE  II 
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COlW»UTErs  Atari  ST  Machine  Language  Programming  Guide 

Simon  Fieid 

ISBN  0-87455-039-4         $18.95         314  pages 

Learn  how  to  program  tfie  Atari  ST's  powerful  68000  microprocessor.  Filled  with  eosy- 

to-understand  explanations,  ©xomples,  and  illustratior^s  of  the  unique  qualities  of  the 

68000  microprocessor. 

COIWIPUTEI's  Technical  Reterence  Guide— Atari  ST  Volume  One:  The  VDi 

Sheldon  Leemon 

ISBN  0-87455-093-9         SI 6.95         343  pages 

Packed  with  program  examples  written  in  C  language,  machine  language,  and  BASIC,  this 

guide  to  progromming  graphics  on  the  Atari  ST  is  a  must  for  every  intermediate  programmer, 

COMPUTEI's  Technical  Reference  Guide— Atari  ST  Volume  Two:  GEM  AES 

Sheldon  Leemon 

ISBN  0-87465-1 14-5         S18.95         330  pages 

The  second  essential  technical  guide  for  every  intermediale-  to  advanced-level  ST  programmer. 

Dozens  of  program  examples  written  in  BASIC,  C,  and  machine  language  teach  you  how  to  use 

AES  routines  to  create  truly  professionoi  looking  programs. 

To  oftler  COIWPUTE!  books,  coll  toll  free  1 -eOO-346^b?67  (in  NY  2)2-867-8525)  or  write  COMPtJTEl  Books.  Customef 
Service,  PO  Boi  5038.  F.D.R.  Statbn,  New  York.  NY  10150.  Customer  Service  Hours  are  10:00  a.m.  to  12:30  pm. 
and  1  30  p.m.  to  3:00  pm.  Eastern  Time  Mon.-Fti.  Please  add  S2  00  per  book  shipping  ond  handling.  NC  residents 
add  5%  sales  tax  and  NV  residsnls  add  8.25%  sales  tax,  Pleose  allow  i-i  weeks  lof  deSvery,  COMPUTE!  books 
ore  ovoilQble  outside  the  United  States  from  .subsidiaries  of  McGraw-Hill  Intsrnotional  Book  Company. 
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M5MHkIBM®XT 

Compatible  System 

Computer,  Drive,  Monitor,  Printers,  Software 

Sale  Price 
$eilA95 


599 


lilt  $3495     [Add  $35.00  shipping.  •) 

•  *15  MHz  (Norton  CI  Rating) 

•  512K  Profetstomii  XT  Compulor 

4.77/8  MHz ;  Clock/Calendar; 
Parallel,  Serial  And  Game  Ports 

•  MS  DOS  3.2  &  G.W.  Basle  Included 

•  HI-Rm  12"  Monochrome  Monitor 

•  Genuine  IBMSVi"  Printer  with  Interface  And  Paper 

•  Software;  Word  Processor,  Spreadsheet  &  Data  Base. 

IBM®  ■•  th«  r«gltl*r*d  Iro^Umor^  oi  ln1»frKJ»(oool  ftu»in»»»  Mochln«(.  Inc. 


No  One  Sells 

This  System 

For  Less! 


Super  Turbo  IBM®  XT 
Compatible  System 

Computer,  Drive,  Monitor,  Printer  A  Software 

#_       Sole  Price 


Lilt  $3495     (Add  $35.00  thipping.') 


Apple®  Compatible 
Complete  System 


No  One  Sdls 
This  System 
For  Less! 


Computer,  Drive,  Monitor,  Printer  A  Software 

^Sale^ 


Sale  Price 


Uit$1228     (Add  $35.00  shipping.') 


No  One  Sells 
This  System 

For  Less! 


•LasorlttK  Computer 

Video,  Parallel  &  Serial  Ports 
Runs  Virtually  All  of  the 
Apple  ll/llc/lle  Softwore 

•  HI  Ret  12"  Monochrome  Monitor 

•  Gonulne  IBM  SVi"  Printer  With  Interface  And  Paper 

•  Software:  Viord  Processor,  Spreadsheet  &  Data  Entry 

AppI*®  It  th*  r»glft1*r*d  trodkmark  of  AppI*  Compvtvri  Incn 


•  10  MHz  /  512K  Super  Turbo 
IBM®  XT  Compatible  Computer 
Video,  Parallel,  And  Serial 
Cards  Included 

•  MS  DOS  3.2  &  G.W.  Boilc  Included 

•  Ht-Re*  12"  Monochrome  Monitor 
;  Genuine  IBM  tVt"  Printer  with  Interfoce  And  Paper 

*  Software:  Word  Processor,  Spreadsheet  &  Data  Base 

IBM®  li  th*  r#gl«t«r*d  Irod^fnorfc  cH  Intwrnaflorol  &u»ln*«»  Wochlr**^.  Itk. 


Conmodore®  64c 
Complete  System 

Computer,  Drive,  Monitor,  Printer  A  Software 

Sale  Price 

List  $1045     (Add  $35.00  jhipping.*) 


No  One  Sells 

This  System 

For  Less! 


*  Commodore  C-64e  Computer 

*  Excelerator  Plus  Dlik  Drive 

*  HI  Res  12"  Monochrome  Monitor 

With  Connecting  Cables 

•  Genuine  IBM  VA"  Printer  With  Interface  And  Paper 

•  GEOS  Software:  Word  Processor  And 
Drawing  Program 

Convnodof  V®  )i  th«  r<gli!»r*d  TrodAmoH^  of  CofnmcKlor*  ■wvlnvH  MochlnM  Inc. 
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COfVtPUTER   DIRECT 

Is  1st  In  PRICE,  SUPPORT,  &  eUARANTEE! 

WE  LOVE  OUR  CUSTOAAERSI 


rrlcMbpli«4-3Mi 


Genuine  IBM®  Printer 

BV2"  Letter  Size  •  80  Column 
Limited  Quantities 


No  One  Sells 

This  Printer 

For  Less! 


?49 


List  $199 


l»t  Com* 
iBt  S«rv* 

Sale 

{Add  $7.50  shipping.*) 

•  Unbelievable  Low  Price  •  Underline 

•  Advanced  Dot  Matrix  ■  Heat  Transfer  •  Enlarged 

•  Upper  &  Lower  Cose  {With  True  Lower  Descenders) 

•  Graphics  With  Commodore,  Apple  &  Atari  Interfaces 

•  Ready  to  Hook  Up  To  Serial  Port  Of  IBM®  PCjr 

•  Low  Cost  Adapters  For  IBM®,  Apple,  Commodore, 
Laser,  &  Atari  Computers 


Super  Ni-Speed  Printer 

200  CPS  Star  Micronics  LV-2010 
With  Crisp  Near  Letter  Quality 


No  One  Sells 

This  Printer 

For  Less! 


Sale  $  I  0095 

{Add  $10.00  shipping.*)     B      ^T     ^T    List  $499 


{Add  $10.00  shipping.*) 

•  200  CPS  Draft  -  45  CPS  Near  Letter  Quality 

•  Serio!  Impact  Dot  Matrix 

•  IBM  Compatible 

•  Near  Letter  Quality  Mode 

•  Ultra  High  Resolution  Bit  Image  Graphics 

•  Pull  Tractor  &  Automatic  Single  Sheet  Loading 

•  Standard  Serial  &  Centronics  Parallel  Ports 


22  CPS  Daisy  Wheel 

13"  Daisy  Wheel  Printer  With 
True  Letter  Quality 


Ultro  Hi-Speed  Printer 

300  CPS  Draft  •  50  CPS  NLQ 
With  Color  Printing  Capabilities 


No  One  Sells 

This  Printer 

For  Less! 


No  One  Sells 

This  Printer 

For  Less! 


Typewriter 
Quality 


Sale$ 

{Add  $10.00  shipping.*) 


List  $499 


$299 


95 


List  $499 


•  True  Letter  Quality 
*  Below  Wholesale  Cost 


•  Daisy  Wheel  Printing 

•  22  CPS,  AAA  Text 

•  13"  Wide  Carriage 

•  Both  Daisy  Print  Wheel  &  Ribbons  Compatible 
with  Diablo^"  &  Qume® 

•  Single  Sheet  or  Continuous  Feed 

•  Low  Cost  Adapters  Available 


Color 

Printing 

Capabilities 

Sale 

(Add  $10.00  shipping.*) 

•  300  CPS  Draft  -  50  CPS  Near  Letter  Quality 

•  Front  Panel  Margin  Setting 

•  Download  Character  Setting         •  Epson/IBM  Modes 

•  Variety  Of  Characters  &  Graphics         •  Bottom  Feed 

•  Parallel  &  Serial  Interface  Ports  •  10K  Buffer 

•  Auto  Paper  Lood  &  Ejection 

•  Optional  7-Color  Printing  Kit Sole  $M.95 


15  Day  Home  Trial  »  90  Doy  Imnriodigfe  Roplqcettiont  Policy 


Call 


(312)382-5050     ^ 


Wie  Love  Our  Customers! 


Mall 


COMPUTER  DIRECT 

22292  N.  Pepper  Road 
Barrington,  IL.  60010 


GALACTICON 

Bill  Chin  and  George  Miller,  Editorial  Programmers 


Protect  your  planetary  system  from 
deadly  solar  fireballs  in  this  exciting 
high-speed  arcade-style  game.  For  the 
Atari  ST,  Commodore  64,  and  Apple 
U  series  of  computers.  The  ST  version 
requires  GFA  BASIC  and  a  color 
monitor.  The  64  version  requires  a 
disk  drive  and  a  joystick.  The  Apple  11 
version  runs  under  either  DOS  3.3  or 
ProDOS.  It  works  with  joystick, 
mouse,  or  keyboard. 


It  is  a  time  in  the  distant  future. 
Aliens  have  inserted  a  deadly  de- 
vice into  the  center  of  the  sun.  This 
device  periodically  throws  a  small 
fireball  into  the  path  of  the  planets. 
As  of  yet.  Earth's  scientists  haven't 
found  a  way  to  disable  the  device, 
so  you  must  destroy  each  and  every 
fireball  that's  in  danger  of  hitting 
one  of  your  planets.  Be  careful  not 
to  overheat  your  blaster — you  may 
need  it  at  any  moment. 

"Galacticon"  demands  quick 
thinking  and  a  sure  trigger-finger 
for  high  scores.  As  you  complete 
each  level,  you'll  move  on  to  faster 
and  more  difficult  screens.  When 
the  last  planet  has  been  destroyed, 
the  game  ends. 

Commodore  64  Version 

In  the  64  version  of  Galacticon,  the 
fireballs  come  out  of  the  sun  on  the 
tips  of  solar  flares.  The  blue  flares 
do  no  damage,  so  track  and  shoot 
only  the  yellow  ones.  Use  a  joystick 


plugged  into  port  2  to  move  the 
crosshairs.  In  this  version  of  the 
game,  your  crosshairs  turn  red  if 
you  fire  too  often.  Allow  them  to 
cool  before  shooting  again. 

After  you've  destroyed  several 
flares,  the  level  ends  and  you  move 
on  to  a  more  difficult  challenge. 
Each  planet  can  take  several  hits 
before  it  is  destroyed.  When  your 
last  planet  has  been  destroyed,  the 
game  ends. 

Galacticon  for  the  64  is  divided 
into  two  programs,  a  BASIC  pro- 
gram and  a  machine  language  pro- 
gram. Type  in  Program  1  using 
"MLX,"  the  machine  language  en- 
try program  found  elsewhere  in  this 
issue.  When  MLX  prompts  you  for 
starting  and  ending  addresses,  re- 
spond with  the  following  values: 

Starting  address:     COOO 
Ending  address:      C7F7 

After  you  have  typed  in  all  the  data 
for  Program  1,  be  sure  to  save  a 
copy  before  exiting  MLX.  Use  the 
name  GALACT.ML  when  you  save 
the  program.  The  BASIC  program 
looks  for  a  file  with  this  name  when 
it  runs. 

Program  2  is  written  in  BASIC. 
Carefully  type  it  in  and  save  it  to 
disk. 

To  run  Galacticon,  type  in  the 
following  line  in  direct  mode  (with- 
out a  line  number): 
POKE  642,64:SYS58260 

Now,  load  and  run  the  BASIC  pro- 
gram, and  the  game  will  begin.  If 


you  forget  to  enter  the  POKE  and 
the  SYS,  the  BASIC  program  will 
give  you  the  information  you  need 
to  start  the  program. 

Apple  II  Version 

Galacticon  for  the  Apple  II  series  is 
made  up  of  two  programs — Pro- 
gram 3,  a  machine  language  pro- 
gram, and  Program  4,  a  BASIC 
program.  Use  "Apple  MLX,"  found 
elsewhere  in  this  issue,  to  enter  the 
data  for  Program  3.  When  asked  for 
starting  and  ending  addresses,  re- 
spond with  the  following  values: 

Starting  address:     8000 
Ending  address:      8AEF 

After  you've  entered  the  data,  be 
sure  to  save  it  to  disk  before  leaving 
MLX.  When  you  save  the  program, 
use  the  name  GALACT.ML.  Pro- 
gram 4  looks  for  a  file  of  that  name 
when  it  runs. 

Next,  type  in  and  save  a  copy 
of  Program  4,  which  is  written  in 
BASIC. 

To  run  Galacticon,  type  HI- 
MEM:6572  in  direct  mode  (without 
a  line  number).  Then  load  and  run 
the  BASIC  program. 

You  are  now  asked  what  con- 
trol device  to  use.  Press  M  for 
mouse,  J  for  joystick,  or  K  for  key- 
board. After  a  brief  pause,  the  game 
starts.  Move  the  crosshairs  to  any 
fireballs  that  leave  the  sun  and 
shoot  to  destroy.  The  energy  bar  at 
the  bottom  of  the  screen  indicates 
the  amount  of  firing  power  avail- 
able to  you. 
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If  you  are  using  the  keyboard 
as  a  control  device,  use  the  keys  W, 
E,  R,  S,  F,  X,  C,  and  V  to  move  and 
use  the  space  bar  to  shoot.  Note 
that  the  joystick  mode  does  not 
work  properly  on  the  Apple  IlGS. 

Atari  ST  Version 

The  ST  version  of  Galacticon  is 
written  in  GFA  BASIC.  You  must 
own  a  copy  of  GFA  BASIC  in  order 
to  type  in  and  use  the  game.  Using 
the  GFA  BASIC  editor,  type  in  the 
program  and  save  it  to  disk. 

To  play  the  game,  use  the 
VIEW  menu's  SET  PREFERENCES 
item  to  switch  to  low  resolution.  Go 
to  GFA  BASIC  and  load  Galacticon. 
Start  the  game  by  selecting  RUN 
from  the  BASIC  menu. 

The  sun  is  in  the  center  of  the 
screen.  Soon,  a  fireball  will  leave 
the  sun  and  head  out  toward  the 
planets.  Use  the  mouse  to  position 
your  crosshairs.  Press  the  left 
mouse  button  to  fire.  If  you  hit  the 
fireball,  it  will  explode.  If  you  let 
the  fireball  get  too  far,  it  may  run 
into  a  planet  and  destroy  it.  The 
energy  bar  at  the  bottom  of  the 
screen  indicates  the  amount  of  fire- 
power available. 

After  you've  eliminated  a  cer- 
tain number  of  fireballs  (depending 
on  the  level),  you'll  move  on  to  a 
tougher  challenge.  The  game  ends 
when  all  your  planets  have  been 
destroyed. 

For  instructions  on  entering  ttiese  programs, 
please  refer  to  "COMPUTEI's  Guide  to  Typing 
In  Progfoms"  elsewfiere  In  this  issue. 

Galacticon — 64  Version — 
Mactiine  Language  Section 

C000:20    0ft  C7  20  E8  C2    20    DF    81 

C008:C4    20  2F  C6  20  9F    C0    AD   F4 

C010:6F    IC  F0  07  AD  15    D0    29    6B 

C013:07    D0  E8  AD  11  D0    29   DF    47 

C020:8D    11  D0  AD  16  D0    29    EF    07 


C028; 

C030; 

C03a: 

C040; 

C048: 

C050; 

C058! 

C060; 

C068i 

C070 

CB78i 

C080r 

CBSSi 

C090; 

C098; 

C0A0; 

C0A8; 

C0B0: 

C0B8: 

C0C0; 

C0C8i 

C0D0: 

C0D8: 

C0E0: 

C0E8[ 

C0F0; 

C0F8; 

C100: 

C108; 

C110 

C118; 

C120 

C128: 

C130: 

C138; 

C140: 

C148; 

C1S0; 

C158: 

C160 

C168; 

C170; 

C178; 

Cia0; 

C188: 

C190; 

C198: 

C1A0 

C1A8: 

C1B0: 

C1B8; 

C1C0 

ClCSi 

C1D0; 

ClD8i 

C1E0 

C1E8; 

C1F0: 

C1F8; 

C200; 

C208; 

C210: 

C218: 

C220; 


80  16 
8D  18 
18    69 

03  99 
71  IC 
FC  60 
48  AE 
00  99 
05  04 
BD  97 
99    01 

04  49 
68  AA 
07  0E 
02  E4 
02    8E 

28  AE 
10  85 
00  85 
A8  Bl 
9D  2A 
90  02 
10  C7 
18  48 
18  68 
0C    AD 

10  D0 
ID  F4 
18  4A 
BD    2A 

29  90 
BD    60 

30  F8 
00  D4 
18  D4 
80  80 
80  80 
07  A9 
A9  00 
A0  19 
40  03 
00    F2 

11  00 
16  00 
18  00 
04  99 
EE  06 
FA  08 
88  C0 
BD  CI 
00  A  9 
FA  AC 
00  40 
9D  9C 
CA  E0 
F8  07 
A2  02 
A9    FF 


A9 
10 
3B 


4A  66 
85  FC 
A0    3F 


00  AD 
D0  A0 

01  29 
27  D0 
85  Ffl 
80  6E 
6E  10 
04  04 
BO  93 
C0  D0 
D4  BO 
01  99 
60  3B 

00  00 
16  80 
5C  IC 
5C  IC 
FE  85 
FD  85 
FD  90 

18  ca 

A9  00 

A2  02 

38  E9 

99  00 

10  00 

4C  10 

C6  80 

18  69 

18  99 

09  18 

4  9  FF 

60  A2 

CA  10 

A9  FF 

12  04 

15  00 

01  80 
99  40 
A2  00 
E8  C8 
AD  11 
AD  16 
AD  18 
A0  FA 
FA  04 
A9  0C 
99  F4 
FF  00 
A9  00 
00  9D 
BO  01 
90  EF 
18  A9 
FF  D0 
80  F9 
AD  IB 
90  32 
80  07 
A9  00 
A9  00 
FD  4A 
A5  FO 
Bl  FD 


18  00  29 
02  B9  27 
0F  C9  0F 
88  10  EE 
AD  72  IC 
IC  8A  48 
BC  BF  00 
BD  85  C0 
99  06 
AD  IB 
9B  00  99 
04  04  68 
04  00 
04  A4 
30 


C0 
03 


29 

00 

30 

BD 

8A 

FC  E6  FO 

FB  BD  12 

22  18  Bl 

98  DO  04 


21 
32  18 
0A  18 


9D 


A0  04 
0C  4A 
D0 


12  18 
BD 
9D 


C9  2C 
3D  FC  C6 
Cl  AD  10 
10  D0  BD 
7A  9D  00 
01  D0  38 
88  88  CA 
18  69  01 
18  A9  00 
FA  A  9  0F 
80  0F  04 
AO  15  D0 
A9  26  8D 
2F  00  A0 

03  88  10 
BO  OF  C6 
C8  C8  C0 
00  09  20 
00  09  10 
00  09  08 
A9  76  99 
99  F4  05 
99  00  03 
09  99  EE 
DF  A9  20 
8D  BC  Cl 
00  40  E8 

ca  ac  BD 

A2  2F  A9 
00  9D  CC 
Fl  A9  0D 
07  80  FA 

04  90  12 
18  CA  10 
18  A9  64 
80  3A  18 
85  FO  A9 
66  FD 
85  FB 
8D  67 


85 
E6 
IC 


F7  39 
00  B8 
F0  ai 

AO  AB 
85  EE 

98  35 
A9  88 

99  40 
04  DF 
04  35 
04  94 
A8  65 

00  02 

01  73 
A2  0A 
10  0B 
69  CE 
A  9  FA 
13  C6 
FB  60 
07  3F 
CA  80 
22  7B 
00  EA 
90  5A 
8D  EB 
00  F6 

22  62 
IS  26 
E9  3F 
10  46 
60  8C 
90  3D 
8D  6D 
A9  2E 
09  63 
FF  20 
3F  F7 
FA  3D 
99  23 
28  89 
80  58 
3D  28 
8D  C2 
00  6A 
99  60 
99  23 
□A  4  8 
80  21 
A2  3E 
00  24 
Cl  76 
FF  F2 
18  10 
8D  E4 
07  5F 
18  FE 
F2  IF 
SD  4  5 
80  OB 

23  31 
FE  ED 
FC  IB 
4  A  68 


"Galacticon"  for  the  64— a  fast-paced 
arcade  shoot-'em-up. 


"Galacticon"  for  the  Atari  ST  features 
superb  aiiimation  and  sound  effects. 


The  Apple  I!  version  features  keyboard, 
joystick,  or  mouse  control. 


C228 
C230 
C238 
C240 
0248 
C250 
0258 
C260 
C268 
C270 
C278 
C280 
C2e8; 
C290 
C298; 
C2A0: 
C2A8; 
C2B0; 
C2B8; 
C2C0 
C2C8; 
0200; 
C2D8; 
C2E0; 
C2E8; 
C2F0; 
C2F8; 
C300; 
C308: 


00  67 
:A9  04 
0A  0A 
80  6F 
80  72 
iC6  2D 
F5  60 
18  20 
ED  B9 
20  23 
SA  4  8 
B4  C4 
23  A9 
BD  27 
D0  29 
52  00 
15  9D 
04  CA 
IE  C6 
C5  A9 
20  52 
lA  18 
AD  72 
68  AA 
A2  2F 
30  7A 
10  80 
5C  IC 
BD    9C 


10  91 

80  6D 

18  69 

IC  A9 

10  60 

15  D0 

B9  00 

28  01 

09  18 

Cl  09 

A9  FF 

80  50 

03  20 

D0  38 

0F  D0 

A0  08 

32  18 

8E  6F 

30  24 

17  90 
C0  AE 
60  71 
IC  69 
AC  5D 
8E  5C 
BD  7C 
6A  IC 
20  5C 

18  80 


FB    88  10 

IC    A5  02 

20    8D  70 

00    8D  71 

A0    06  B9 

00    04  88 

18    38  ED 

09    6E  06 

38    ED  11 

76   C6  B0 

90    9C  18 

IC   00  03 


52    C0 
E9    01 


98 

90 

A9    00 


1 

20    CO  05 

AE    6F  IC 

IC    A2  03 

A0    08  20 

32    18  A9 

5E    IC  BD 

80  71 

80  72 

10  40  5  6 
IC  BD  9C 
lA  F0  54 
20  F9  C3 
C4    AE  50 

11  18  BD 


IC 
00 


F2  BF 
0A  9  9 
IC  13 
IC  BB 
F4  40 
10  EB 
03  AD 
B0  El 
18  A9 
OE  F4 
20  3A 
B0  93  I 
AA  DO 
27  12 
20  47 
A9  81 
F0  44 
20  45 
CD  7A 
01  96 
70  51 
IC  44 
IC  23 
C2  32 
18  40 
A9  93 
AE  18 
10  3C 
3C    12 
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Since  1981 


Lyco  Computer 

Marketing  &  Consultants 


Order  processed  within  24  hours. 


rLASER128 


Ilc-rie  Compatible.  Buiit-m  i28k 

Ram 

•  Built-in  SVi  Drive 

•  Built-in  Parallel 
Port 

•  Buift-in  Mouse/ 
Joystick  Port 

•  Hi  Res.  Graphics 


MLASER 128 


ONLY 


Seikosha  SP1000  AP  S1 69.95 
With  Laser  Purchase 


®  BLUE  CHIP 

PERSONAL 
COMPUTER 

•  4.77  Mhz 
speed 

•  Dual  floppy 

•  Green  monitor 
included 


$579 


95 


COMMODORE 

128  D  System 


$439 

Commodoce 
1280  Plus 
■Riomson  4120 
MonilOf 
$629.95 


AATARI 

520  ST  Computer 


•  Built-in 
.  Drive 

•  Thomson 
4120 

Monitor 


95 


HARDWARE 

Laser  128  llc-lte  Comp $375.95 

Laser  128  EX  S429.95 

Laser  Exiemal  5vi  Drive S1 19.95 

Laser  External  3v4  BOOK  Drive  .  S199.95 

Two  Slol  Expansion  Box S44,95 

Laser  128/EX  IHousa  $55.95 

PC  COMPATIBLE 

HARDWARE 

BCM  12G  Gr.  Monitor $75 

BCM  12A  Am.  Monitor $79 

BCC  CG  Color  Card  $94.99 

Zudorboard  $CAU. 

Hercules  SCALL 

AST  SCALL 

Laser  Compacl  XT $475.95 

Laser  Compact  XTE  640K $549.95 

Laser  Desktop  Turtio  XT  256K  .  $569.95 
Laser  Desktop  Turtxj  XT  640K  .  $599.95 
Laser  EGA  +  4  Card $129.95 

(%^  Seagate 

HARDWARE 

20  meg  kH  $259.95" 

30  meg  kit  $299.95" 

40  meg  kit  $4S5.95* 

'Drives  include  controller 

40  meg  w/o  controller  $415.95 

COMMODORE 

HARDWARE 

1541  II  Disk  Drive  $175.95 

1571  Disk  Drive $215.95 

1581  Disk  Drive $189.95 

Indus  GT  C-64  Drive $169.95 

1802C  Monitor $189.95 

64  C  Compuler $169.95 

12BD  Computer/Drive  $439.95 

C-1351  Mouse $32.95 

1700  RAM  $109.95 

O1750  RAM  SCALL 

1764  RAM  064  $1 17.95 

1084  Monitor  $279.9S 

128  Computer  $219,95 

AATARI 

HARDWARE 

520  ST  FM  Mono  SS75.95 

520  ST  FM  Cokir   $819.95 

1040  ST  Mono  SCurretil  Tariff 

1040  ST  Color $Cun-errt  Tarifl 

130XE  Computer $135.95 

SXS51  Drive $CALL 

SF  314  Disk  Drive $219.95 

Indus  GT  Atari  Drive  $175.95 

SHD  204  20  MEG  Drive  $579.95 

XM301  Modem $42.95 

SX212  Modem  $89.95 

GTS  100  (3.5-  DSOD  ST]  $195.95 


W/LASERCOMRflCTXT 


•  PC-XT  •  Parallel  Printer 
Compatible  Port 

•  4.77  -  8.00  Mhz        •  Serial  RS232 
Super  Turbo  «  Joystick/Game 
Clock  Speed  pgrt 

•  Built-in  51/4  Drive 

•  Built-in  RGB 
Video  Output 


ONLY 


$475 


95 


m  BLUE  CHIP 

Popular $C  A  L  L 

#  BLUE  CHIP 

286  AT  „  $CALL 

COMMODORE  64C 

Computer 


AATARI 

520  ST-FM 

Monochrome 

System 


$769 

1-800-233-8760 


Internal 

drive 

included 


I  Price  Guarantee 

]j  Since  1981 ,  we  have  led  the  industry  by 

continuing  to  offer  the  lowest  national 
prices  while  providing  quality  service.  f^Aany 
companies  have  come  and  gone  trying  to 
imitate  our  quality  and  service.  If  by  some 
oversight  we  do  not  have  (he  lowest  prices 
advertised  on  the  products  you  desire, 
then  we  would  appreciate  the  opportunity 
to  rectify  this  oversight. 


The  Paper  Saver! 


Panasonic 

10921 


V    ^     i    1 

^'^jgH 

^'« 

\\A       . 

»v 

y-]— -~. 

7~ ) 

-  ■  -     —  / 

240  CPS/12  Character 
Mode 

Push  Feed  Tractor 
NLQ  Mode  48  CPS 
Excellent  Versatility 
interfacing  Available  for 
IBM  PC  and  Many 
Others 


295 


95 


Monitors 


Modems 


Thomson: 

230  Amber  TTLyi2' $79.95 

460  ArrHwrTTL'lS-    .  S69.95' 

4120  CGA  S199.95 

4160  CGA  S259.95 

4460  EGA S319.9S 

4375  UlSraScan   5389.95 

GB  100  EGA  Card  S129.9S 

GB  200  Super  Card  $219.95 

•OtunUUes  Umltad 


Blua  Chip: 

BCM  12"  Graen  TTL  $75 

BCM  \T  Amber  TTL S79 

NEC; 

Multisync  II  $559 

Save  $170  over  MEC  MuHliync 

with  Thomson  4375  UltraScan 

S389.95 


New  for  '88 


THOMSON  O  ZZ: 

41 20  Monitor  '™i  PC  card  $69.95 

1200hc  Modem  $89.95 

.  14"  HGSkvideo  gjog j,7g  55 

composite  analog  *■'!>. jj 

.  Compalibte  with  IBM  ^^  ^^  ^^  ^'^^-^ 

and  Commodore                                Hayes: 
•  RGB  data  cable  A  «<  ^Q95  Smartmodem  300 S149.95 

included  U    1  %7«/  Smartmodem  1200 S285.95 

^  Smartmodem  2400 S425.95 


Great  Performance 
Great  Price 


.IL 


In  I  c  r  •  A  1 1 1  •  1  n  < 


*  1 44  cps  Draft 

•  36  cps  NLQ 
____      «._..^.,_.        'EZ  Operation  Front 
M  Y^l  QQQ  Panel  Control 


$165 


95 


NEW!  NX1000  Rainbow 
Color  Printer     $225.95 


Sp  180Ai 

•  100  cps  draft 

•  20  cps  NLQ 

I 

Seikosha  price 
increases  possible 
—  please  order 
early. 


J 

-^ 

m 

^ 

m 

m 

h 

j:'-.'!rlr ' 

■it- 

w 

h; 

«&= 

^ 

^^ 

^^^-' 

$129 


95 


PRINTERS 


SEIKOSHA 

SP  ISOAi  $129.95 

SP  1B0VC  $129.95 

SP  tOOOVC  S139-95 

SP  1000AP $169.95 

SP  1200VC  $155,95 

SP  1200Ai  S165.95 

SP  1200AS  RS23S   $165.95 

SL  80Ai $299.95 

MP1300AI  $269.95 

MP5300Ai $399.95 

MP5420Ai  5879.95 

SP  Series  Ribbon $7.95 

SK3000  Ai  $339.95 

SK3005  Ai  $419.95 

SPB10  $CALL 

SL  laOAi $599.95 

Toshiba 

321SL  _   .  $469 

341  SL  $659 

P351  Model  II  $899 

351  SX  400  cps   S1019 


NL-lOw/oCart $159,95 

NX-1000 $165.95 

NX-1000C $175.95 

NX-1000  Color  S225.95 

NX-IOOOC  Color $229.95 

NX-15  $295.95 

ND-10  S265.9S 

ND-15  $379.95 

NR-10  $309 

NH-15  $425.95 

NB-15  24  Pin $699.95 

NBSa-lO  24  Pin S425.95 

NB24-15  24  Pin S559.9S 

♦citizen 

120  D  S14995 

180  D $169.95 

MSP-10   $259.95 

MSP-40   $289.95 

MSP-15   S324.95 

MSP-50   S389.95 

MSP-45   $426.95 

MSP-S5   $489.95 

Piemiere  35 $464.95 

Tribute  224  $624.95 


EPSON 

LX800  $175.95 

FXB6E  $289.95 

FX286E $429.95 

EX800 $374.95 

eXlOOO _. _._ S469-95 

LQ500 $CALL 

LQIOOO 5549,95 

LQ2500 5849,95 

GQ3500  $LOW 

LQeSO S499.95 

LQ1050 $679.95 

OKIRATA 

Okimate  20  $119 

OWmate  20  w^'cart $179.95 

120 $189-95 

180 $219.95 

182  -   S22S.95 

183 $249.95 

192+  $309.95 

193  +  S449.95 

292  w/interface $449.95 

293  wjinterlace 5585.95 

294  wylnlerface $819.95 

393 $955.95 


Panasonic 

lOSOi  Model  II  $165.95 

lD91i  Model  II  5185.95 

1092i $295.95 

1592 $399.95 

1595 S449.95 

3131  $269.95 

3151  $419.95 

KXP  4450  Laser SCALL 

1524  24  Pin  5559.95 

Fax  Partner $589.95 

DIABLO 

025  $499.95 

635 5779.95 

BROTHER 

M1109  $195 

M1409  $299 

M1509  $335 

M1709  5475 

Twinwriter  6  Dot  &  Daisy S899 

M1724L   $599 

HR20  $339 

HH40  $569 

HR60  5709.95 


Join  the  thousands  who  shop  Lyco  and  Save! 


We  stock  Interfacing  tor  Atari,  Commodore,  Apple  and  IBM. 


SOFTWARE 


BEST  SELECTION 


COMMODORE 


COMMODORE 


^MMIGA 


IBM 


$22.95 

........  $24.95 

$28.96 

[Ions: 

$22.95 

SS2.95 

$22.95 

I $22.95 

$31.49 

$14.95 

$44.95 

$39.95 

$44.95 

$14.95 

S19.95 

$17.95 


$25.95 
$19.95 
$28.95 
$22.95 
$11.95 
$22.95 
$11.95 
$i1.9S 
$14-95 

$18.95 

$18.95 

tball.    $19.95 

$19.95 

B $22.95 

Of $1 5.95 

$25.95 

$19.95 

'  $16.95 

$19.95 

$19.95 

$19.95 

$31.95 
$31.95 

$29.95 

$29.95 

$35.95 

$39.95 

$29.95 

$39.95 

$39.95 

S29.95 

S27.95 

10  $19.95 

III  $13.95 

$25.49 

m $22.95 

$12.95 

$16.95 

ige...  $11.95 


Elednmlc  Art*: 

Bard's  Tale  $25.95 

Legacy  of  The 

Ancients $20.95 

Marble  Madness $20.95 

Slartloet  I $25.95 

Yaagor's  AFT  $22.95 

Epyx: 

Deslroyer $22.95 

Faslloati $19.95 

Sub  Batlle $22.95 

Winter  Games $11.95 

California  Games  $22.95 

Graphics  Scraptxjok  ......  S9.95 

Sir.  Sports  Basketball .  $22.95 

SuiTimer  Games  II $11.95 

World  Games  $22.95 

Jet  Combat $8.95 

Rrebird: 

Elite $18.95 

Golden  Palh  $22.95 

Guild  Of  Thieves $22.95 

Pawn  $22.95 

Tradser $22.95 

Starglider $18.95 

Sentry  $22.95 

Micro  league: 

Microleag.  Baseball $22.95 

General  Manager $16.95 

Slat  Disk $13.95 

Microleag.  Wrestlir^  ....  $16.95 

•87  Team  Disk $11.95 

MIcroproH: 

AirtiomB  Ranger $22.95 

F-15  Strike  Eagle $19.95 

Gunstilp $19.95 

Kennedy  Approach 513.95 

Silent  Service  519.95 

Solo  Right $13.95 

Top  Quimef $13.95 

Pirates  $22.95 

Stealth  Fightef $22.95 

Origin: 

Autoduel $28.95 

Ultima  III $22.95 

Umma  IV $33.95 

Hoebtus $22.95 

Software  Simulations: 

Pure  Stat  easeball  $22.95 

Football $17.95 

Pure  Slat  College 

Basketball $22.95 

Springboard: 

Newsroom  $29.95 

GertificatB  Maker $29.95 

aip  An  Vol.  #1  $17.95 

Clip  Art  Vol.  #2  $23.95 

Clip  Art  Vol.  #3  $17.95 

Graphics  Expander  $21.95 

Strategic  Simulations: 

Qottysburg $33.95 

Phantasie  II  $22.95 

Phanlasie  ill  $22.95 

Ring  of  ZeSin $22.95 

Road  War  2000 $22.95 

Shafd  of  Spring S22.95 

Wizards  Crown $22.95 

Wargame  Consir S16.95 

Baltfeauiser  533.95 

Balde  o!  Anietiem 528.95 

Eternal  Dagger $22.95 

Shlloh $22.95 

Sublogic: 

Right  Simulator  II  $31.49 

Jet  Simulator  $24.95 

Nigtit  Mission  Pinball ...  $18.95 

Scenery  Disk  1-6 $12.95 

Stealth  Mission $31.95 

Tlmowotks; 

Paitrwr  C64 $22.95 


Pannerl2a $27,95 

Swift  Gate  128 $27.95 

Wordwriter  128 $27.95 

Wordwriler  3  $4 $22.95 

Unison  World: 

An  Gallery  1  or  2  $14.95 

Print  Master $17.95 


Access: 

Triple  Pack  $11.95 

World  Class  Leader 

Board $23.95 

Famous  Courses $11.95 

Acthrlslon: 

ZorisTrikjgy  $39.95 

Game  Maker  $29.95 

Leather  Goddesses $22.95 

Term  Paper  $29.95 

Champ.  Baseball 522.95 

Champ.  Basketball $22.95 

GFL  Football  522.95 

Top  Fuel  Eliminator .....  $1 9.95 
Broderbund: 

Alrheart $22.95 

Print  Shop  $26.95 

Pnnt  Shop  Comp. $22.95 

CannenS.  Diego  (USA)..S22.95 

On  Balance  $56.95 

Bank  St.  Writer  +  $44.95 

Electronic  Arts: 

Bards  Tale  II $32.95 

Legacy  of  the 

Ancients 525.95 

Epyx: 

DesUoyer $22.95 

Movie  Monster $11.95 

St.  Sports  Basketball ...  $22.95 
Sub  Battle  Simulator  ...  $22.95 

Winter  Games  $11.95 

Wortd  Games  $22,95 

Wrastang  $11.95 

Firebird: 

Cokissus  IV  Chess $22.95 

Elite $19.95 

The  Pawn $25.95 

Slarglider $25.95 

Mlcroleague: 

Microleag.  Baseball $22.95 

General  Manager  $16.95 

Slat  Disk $11.95 

'S6  Team  Disk $11.95 

Mlcroprose: 

Crusade  in  Europe $22.95 

Decision  in  Desert 522.95 

F-15  Strike  Eagle  $19.95 

Silent  Senrics  $19.95 

Pirates  $22.95 

Strategic  Simulations: 

Batllecruiser  $33.95 

Cokmial  Conquest $22.95 

Gettysburg S33.95 

Phanlasie  III  522.95 

Realms  of  Darkness  ....  $22.95 

Shard  of  Spring  S22.95 

Wizards  Crown  $22.95 

Eternal  Dagger  $22.95 

Shlloh 5NEW 

Sublogic: 

Flight  Simulator  II  $30.95 

Jet  Simulator  S24.95 

Night  Mission  Pinball ...  $21.95 

Scenery  #1-#  ea $12.95 

Unison  World: 

Art  Gallery  2  $14.95 

Print  Master $19.95 


Access: 

Leader  Board  $22.95 

Tournament  #1  $11.95 

A{:thrlslon: 

Champ.  Basketball  $25.95 

Championship  Son $22.95 

GFL  Foomall  $25.95 

Music  Studio $27.95 

Electfonlc  Arts: 

Deluxe  Print  II  $48.95 

Rockford  $25.95 

Empire  $31.98 

Scrabble  $25.95 

Epyx: 

Apshai  Trilogy  $11.95 

Rogue $22.95 

Winter  Games  $22.95 

Worid  Games  $22.95 

FIrsbIrd: 

Guild  ol  Thieves $25.95 

Pawn  $25.95 

Stargddef $25.95 

Mlcroprose: 

Silent  Sendee  $22.95 

Sublogic: 

Flight  Simulator  II  $31.49 

Jet  Simulator  $31.49 

Scenery  Disk  $CW-L 

Unlaon  Worid: 

Print  Master $19.95 

Art  Gallery  1  or  2  $14.95 

Fonts  &  Borders $17.95 


IBK 


Access: 

WJd.  CI.  Leader  Board  .   $27.95 

10th  Frame $27.95 

Acthrlslon: 

Champ.  Baseball $22.95 

Champ.  Basketball  $22.95 

2ork  Trikjgy  $39.95 

Leather  Goddesses $22.95 

Beyond  Zork $27.95 

BrodertHjnd: 

Ancient  Art  ol  War S25.9S 

Print  Shop  $32.95 

Print  Shop  Compan $31.95 

Graphk;  Lib.  I  or  II $19.95 

Karateka $19.95 

Toy  Shop $22.95 

Bank  St.  Writer  +  $44.95 

Ancient  Art  of  War 

al  Sea $25.95 

Electronic  Arts: 

Pegasus  $25.95 

Weaver  Baseball $25.95 

Rockford $25.95 

Epyx: 

ApshaiTrikjgy  $11.95 

Create  A  Calendar  $15.95 

Destroyer $22.95 

Movie  Monster $11.95 

Rogue $16.95 

SL  Sports  Basketball ...  $22.95 
Sub  Battle  Simulator  ...  $22.95 

Winter  Games $11.95 

Wofid  Games $22.95 

Firebird: 

Starglkler $25.95 

Guild  of  Thieves  $25.95 

MIctolsague: 

Mkroleag.  Baseball $22.95 

Qsneral  Manager $16.95 

Slal  Disk $13.95 

Mlcroprose: 

Conflict  in  Vietnam  $22.95 

Crusade  in  Europe $22.95 


Decision  in  Desert $22.95 

F-t5  Strike  Eagle  $2Z95 

Silent  Ser,1ce  $22.95 

Gunship  ., $27.95 

Pirates $22.95 

Ortgin: 

Ultima  I $22.96 

Ultima  111 $22.95 

Ultima  IV $33.95 

Moebius $33.95 

Ogre  $16.95 

Strategic  Simulations: 

Road  War  2000 $22.95 

Gettysburg $33.95 

Wizards  Crown $22.95 

Sublogic: 

Jet  Simulator $31.49 

Scenery  Japan  $17.95 

Scenery  San  Fran $17.95 

Scenery  #1-#6  $64.95 

Flight  Simulator $34.95 

Tlrrreworks: 

Swiftcalc  $39.95 

Wordwriter $34.95 

Unison  World: 

Art  Gallery  2  514.95 

News  Master  $49.95 

Print  Master  (  +  ) $29.95 

Fonts  &  Borders  $17.95 


* 

i 

^  Diskettes  A 

r 

^^^^^^K 

5 
M 

S 

D 
B 
S 
D 
S 
D 
D 

.Md 

SOO  ...„ 

SOD 

J7.9S 

$8.95 

onus; 

SDD  

S5.95 

SDO  

$6.95 

KC: 

SDD  

$6.95 

SHD  

$13.95 

Generic  DSDD  S4.95 

Verbatim: 

SSDD  Se.99 

DSDD  $11.50 

3.5 

Maxell: 

SSDD  $11.50 

DSDD  $17.95 

Bonus: 

SSDD  $10.95 

DSDD  $13.95 

Verbatim: 

SSDD  $12.95 

DSDD  $16.95 

SKC; 

SSDD  S9.95 

DSDD  $13.99 

Generic  SSDD S9.75 

Generic  DSDD  $12.95 


Joysticks 


Tac  3  $9.95 

Tac2  $1095 

Tac  5  „ $12.95 

Tac  1  +  IBM/AP  $26.95 

Economy $5.95 

Slik  SBck $6.95 

Black  Max $10.95 

Boss  $11.99 

3-Way $19.99 

Bathandle $16.75 

Wflnner  909 $24.95 

Wico  IBM/AP $29.95 

Upstk*  Plus  S14.95 

Kraft  KC  111  Ap/PC $16.95 


ping  on  Prepaid  cash  orders  over  S50  in  the  Continental  US. 


Lyco  Means  Total  Service. 


Order  Now 


Mark  "Mac"  Bowser, 
Sales  Manager 

I  would  personally 
like  to  thank  all  of  our 
past  customers  for 
helping  to  make  Lyco 
Computer  one  of  the 
largest  mail  order 
companies  and  a 
leader  in  the  industry. 
Also,  I  would  like  to 
extend  my  personal 
invitation  to  all  computer 
enthusiasts  who  have 
not  experienced  the 
services  that  we  provide. 
Please  call  our  trained 

sales  staff  at  our  toll  free  number  to  inquire  about  our 

diverse  product  line  and  weekly  specials. 

First  and  foremosi  our  philosophy  is  to  keep  abreast 
of  the  changing  market  so  that  we  can  provide  you  with 
not  only  factory-fresh  merchandise  but  also  ifie  newest 
models  offered  by  the  manufacturers  at  the  absolute  best 
possible  prices.  And  we  offer  the  widest  selection  of 
computer  hardware,  software  and  accessories. 

Feel  free  to  call  Lyco  11  you  want  to  know  more  about 
a  particular  item.  I  can't  stress  enough  that  our  toll-free 
number  is  not  just  for  orders.  Many  companies  have  a 
toll-free  number  for  ordering,  but  if  you  just  want  to  ask  a 
question  about  a  product,  you  have  to  make  a  toll  call.  Not 
at  Lyco.  Our  trained  sales  staff  is  knowledgeable  about  all 
the  products  we  stock  and  is  happy  to  answer  any  questions 
you  may  have.  We  will  do  our  best  to  make  sure  that  the 
product  you  select  will  lit  your  application.  We  also  have 
Saturday  hours  —  one  more  reason  to  call  us  for  all  your 
computer  needs. 

Once  you've  placed  your  order  witfi  Lyco,  we  don't 
forget  about  you.  Our  friendly,  professional  customer 
service  representatives  will  find  answers  to  your  questions 

J        about  the  status  of  an 
order,  warranties, 
product  availability,  or 
prices. 

Lyco  Computer 
stocks  a  muitimillion 
dollar  inventory  of 
factory-fresh 
merchandise.  Chances 
are  we  have  exactly 
what  you  want  right  in 
our  warehouse.  And  that 
means  you'll  get  it  fast. 
In  fact,  orders  are 
normally  shipped  within 
24  hours.  Free  shipping 
on  prepaid  cash  orders 
over  $50,  and  there  is 
no  deposit  required  on 
C.O.D.  orders.  Air  freighter  UPS  Blue/Red  Label  shipping  is 
available,  too.  And  all  products  carry  the  lull  manufacturers' 
warranties. 

I  can't  see  why  anyone  would  shop  anywhere  else.  Selec- 
tion from  our  huge  in-stock  inventory,  best  price,  service  that 
can't  be  beat  —  we've  got  It  all  here  at  Lyco  Computer. 
TO  ORDER,  CALL  TOLL-FREE:  1-800-233-8760 
New  PA  Wats:  1-800-233-8760 
Outside  Continental  US  Call:  1-717-494-1030 

Hours:  9AM  to  8PM,  Mon.  -  Thurs. 
9AM  to  6PM,  Friday  —  10AM  to  6PM,  Saturday 

For  Customer  Service,  call  1  -71 7-494-1 670, 

9AM  to  5PM,  Mon,  -  Fri.  »_«>« 

Or  write:  Lyco  Computer,  Inc.  'S--'- 

P.O.  Box  5088,  Jersey  Shore.  PA  17740 

C.O.D.  Ri>k-Fre«  Policy:  •  full  manufaclurers'  wananlies  •  no  saies  lai 
outside  PA  •  prices  show  4%  cash  discount:  add  4%  for  credit  cards  •  APO. 
FPO,  International:  add  S5  plus  3%  for  prionty  •  4-week  clearance  on  personal 
checks  •  we  check  for  credit  card  theft  •  soriy,  compatibjlity  fwt  guaranteed  • 
return  authorization  required  •  due  to  new  product  guarantee,  return  restrictions 
apply  •  price/availability  subject  to  change  •  prepaid  orders  under  $50  in 
Continental  US,  add  $3.00 

Attention  Educational  Institutions: 

you  are  not  currently  using  our 
educational  service  program,  please 
call  our  representatives  for  details. 


AATARI 


Accns: 

Triple  Pack $11.95 

Leader  Board  Pack  $14.95 

Actlvlslon: 

Hitch  Hikers  $13.95 

Music  studio $19.95 

Brodertiund: 

Print  Shop  $25.49 

Print  Shop  Compan $22.98 

Graphic  Lib.  I,  II.  Ill  S13.49 

Bank  St.  Writer S27.95 

Electronic  Arts: 

Pinball  Con  Set  SB.95 

Lords  of  Conquest S8.95 

Startieel  I  $32.95 

Chess  Master  20IX) $25.95 

Music  Con  Set $8.95 

Super  Boulderdash  $8.95 

One  on  One  $8.95 

Rnfalrd: 

The  Pawn $22.95 

Mlcroleague: 

Mcroleag.  Baseball .....  $22.95 

General  Manager  $16.95 

Stel  Disk $13.95 

MIeroprose: 

Conliict  in  Vietnam S22.95 

F-15  Strike  Eagle  S19.95 

Kennedy  Approach S1 3.95 

Silent  Saivice  519.95 

Top  Gunner SI  3.95 

Strategic  Slmulstlena: 

Battle  of  Anietienn S2B.95 

Batllecnjiser  S33.9S 

Nam S22.95 

Phantasie S22,95 

Wargame  Construe S16.95 

Warship S33.95 

Wizards  Crown $22.95 

Subloglc: 

Flight  Simulator  II $31.49 

Night  Mission  Pinball ...  $18.95 

Scenaiy  #1-#6  ea $12.95 

Scenery  #7  $14.95 


Accet*: 

Leader  Soaid  $22,95 

Tournament  #1  S11.95 

10th  Frame S22.9S 

Actlvlslon: 

Champion.  Baseball  ....  322.95 

Champion.  Basketball .   $22.95 

Championship  Golf $Ngw 

GFL  Football  ,.,.. $22,93 

Music  Studio $27,95 

Bureaucracy  $22.95 

Electronic  Arts: 

Arctic  Fox  $25,95 

Empire $32.95 

Statfleet  I $32.95 

Chess  Master  2000 $25.95 

Gridiron S32.9S 

Epyx; 

Sub  Battle  Simulator  ...  S22.95 

Work)  Games  522.95 

WresUina S22.95 

Winter  Games  $11.95 

Firebird: 

Pawn  525.95 

Stargiidar $25.95 

GokJen  Path  $25.95 

Guild  of  Thieves $25.95 

Tracker  $25.95 


Acc«»: 

Echelon  

Mach  5  ,* 

Mach  - 128 

10th  Frame 

Triple  Pack  

Wld.  CI.  Leader ' 
Famous  Courses 
Famous  Courses 
Leader  Board  Pt 
Action  Soft: 
Up  Periscope .... 
Thunderchopper 
ActlvlskHi; 
Champion.  Bask. 

Music  Studio 

Leather  Goddes: 
Top  Fuel  Eliminf 

Beyond  Zbric 

GFL  Football  .... 
Gee  Bee  Air  Ral 

Last  Nlnja 

Might  &  Majlc  .. 
Nord  &  Bert  


0310:18    8D    08    18    38    E9    13    20    39 

C5A8:90    03    CE    6D    IC    60 

4E 

67 

54 

C318:28    CI   C9    03    B0    0D    AD    11    B3 

C5B0: IC    80    FA    A2    04    20 

IE 

06 

A3 

C320;18    38    E9    0C    20    28   CI    C9    AE 

C5B8:30   F3    A9    02    20    52 

00 

AD 

28 

C328:03    90    44    BD    FC    18    0A    2E    44 

C5C0:6D    IC    8D    60    IC    18 

69 

02 

93 

C330:08    18    0A    2E    08    18    BD    5C    5E 

0508:80    60    IC    A0    07    89 

00 

18 

3B 

C338:19    A0    03    0A    2E    11    18    88    E3 

C5D0:9D    00    18    89    09    18 

90 

09 

B6 

C340:D0    F9    8E    5E    IC    20    4C   C2    23 

0508:18    BD    00    18    09    7A 

90 

00 

06 

C348:4C    6F    C3    A9    08    8D    6A    IC    4C 

C5E0:AD    10    D0    ID    F4    C6 

80 

10 

21 

C350:20    F9   C3    AE    5C    IC    20    5C   B9 

C5E8:D0    40    F5   C5   AD    10 

D0 

3D 

97 

C358:C4    30    14    AE    5C    IC    A9    00    62 

C5F0:FC   06    80    10    D0    8A 

0A 

A8 

CC 

C360:8D    6A    IC    20    F9   C3   AE    5C    67 

C5F8:BD    00    18    0A    69    00 

99 

00 

B5 

C368:1C    4C    6F    C3    20    AC    C3    AE    25 

O600:D0    BO    09    18    18    69 

29 

99 

5A 

C370:5C    IC   CA    E0    FF   F0    03    4C    AA 

C608:01    DO    A9    20    90    F8 

07 

A9 

0A 

C378:EA   C2    20    7D   C3   A2    5F    8E    F7 

0610:00    90    32    13    AD    15 

00 

ID 

4D 

C38fl:5C    IC    BD    9C    18    30    15    A9    14 

C618:F4   C6    8D    15    00    60 

EA 

AD 

60 

C388;00    8D    6A    IC    20    07   C4    BD    E6 

C620:15    00    3D    F4    C6    F0 

07 

E8 

54 

C390;D4    C6    31    FD    91    FD   AE    5C    78 

C628:E0    07    D0    F3   A2   FF 

60 

A2 

B9 

C398;1C    20    5C    C4    AE    5C    IC    CA   F7 

0630:00   BD   F3    07    30    32 

BD 

32 

B4 

C3A0:E0    2F    D0    DH     60    AD     IB    D4     01 

C633: 18    30    20    A8    B9   AD 

C6 

90 

BD 

C3A8:6D    IB    D4    60    BD   AC    lA    F0    14 

0640:27    D0    B9    86   C6    30 

18 

48 

A4 

C3B0:05   BD   CC    18    10    42    A9    13    35 

0648: 18    69    20    9D    F8    07 

68 

A8 

77 

C3B8:9D    3C    18    A9    0C    9D    9C    18    E3 

C650:B9    7E   06    90    6E   C6 

0A 

90 

4D 

C3C0:A9    00    9D    7C    lA    BD    FC    18    72 

0658:76    C6    FE    32    18    00 

09 

AD 

99 

C3C8:9D    9C    IB    BD    5C    19    9D    FC    05 

C660:15   D0    3D   FC   C6    8D 

15 

D0 

BB 

C3D0:1B    20   A5   C3    90    3C    IB    9D    93 

C668:E8    E0    07    D0   04    60 

02 

02 

3E 

C3D8:1C    lA    20    28    CI    80    67    IC    AA 

C670:02    05    00    00    00    00 

03 

03 

49 

C3E0:20    A5    C3     9D    BC    19    9D    DC    96 

C678:03    0A    00    00    00    00 

00 

01 

0B 

C3E8:1A    20    23    CI    18    6D    67    IC    06 

0680:03    05    04    01    FF    05 

00 

01 

76 

C3F0:CD    70    10   B0    03    90    7C    lA   AB 

0683:02    02    03    03    03    03 

03 

03 

55 

C3F8:60    20    07   C4    Bl   FD    2D    68    31 

0690:03    03    04    04    04    04 

05 

05 

60 

C400:1C    ID    DC   C6    91    FD    60    A9   05 

C698:05    05    FF    00    00    00 

00 

00 

E9 

C408:00    8D    5F    IC    BD    90    18    4A    7D 

C6A0:01    02    07    07    07    07 

07 

07 

E9 

C410:6E    5F    IC    4A    6E    5F    IC    7D    77 

C6A3:07    07    07    07    FF    01 

01 

07 

09 

C418:9C    18    69    20    85    FE   BD    3C    05 

C6B0:0A    0A    07    07    0A    0A 

OA 

0F 

82 

0420:18    0A    QA    0A    90    02    E6    FE    73 

C6B8:0F    0F    0F    00    0B    0B 

00 

0F 

DF 

C428:18    6D    5F    IC    85    FD    90    02    0S 

0600:01    01    01    01    01    01 

01 

01 

4E 

C430:E6    FE    BD   FO    18    4A    4A    4A    3D 

C6C8:01    01    01    01    01    01 

01 

IC 

71 

C438:4A    4A    29    06    18    8D    6B    IC    E8 

C6O0:3E    3E    3E    IC    3F    3F 

OF 

OF 

FC 

C440:6D    6A    10    8D    6A    10   BD    5C    13 

C6D8:F3    F3    FC    FC    C0    00 

30 

30 

66 

C448:19    4A    4A    4A    4A    4A    A8    AE    5A 

C6E0:0C    0C    03    03    80    80 

20 

20 

6E 

C450:6B    IC    BD    D4    06    80    6B    IC    FA 

C6E8:08    08    02    02    40    40 

10 

10 

10 

C458:AE    6A    IC    60    BD   BC    19    IB    88 

C6F0:04    04    01    01    01    02 

04 

08 

Dl 

C460:7D   FC    18    90   FC    18    BD   BC    45 

C6F8:10    20    40    80    FE   FO 

FB 

F7 

36 

0468:19    30    08    90    12    FE    3C    18    Bl 

O700:EF    OF    BF    7F    FE   C8 

50 

00 

2B 

C470:4C    78    C4    B0    0A    DE    3C    13    3E 

C70a:00    00    A0    00    A2    00 

86 

FD 

OB 

C47a:BD    3C    18    09    28    B0    27    BD    9F 

O710:A9    03    35    FE   BO    67 

07 

09 

FB 

C480:1C    lA    18    7D    5C    19    9D    5C    58 

C718:FC    F0    43    09    FD    D0 

OA 

A9 

58 

C488:19   BD    10    lA    30    08    90    12    08 

0720:00    91    FO    20    61   07 

40 

5B 

F3 

C4  90:FE    90    18    4C    9B   C4    B0    0A    E3 

C728:C7   C9   FE    00    0F    A9 

00 

91 

AB 

C498:DE    9C    18    BD    90    18    C9    19    89 

C730:FD    20    61   07    91    FO 

20 

61 

95 

C4A0:a0    04    BD    9C    18    60   A9    FF    9A 

C738:C7    40    5B    07   09   00 

00 

16 

AC 

C4A8:9D    9C    18    E0    30    B0    F3    BD    23 

C740:E8   BD    67   C?    8D    5C 

10 

A9 

DC 

C4B0:7C    lA    F0    00    BD    DO    lA    9D    50 

C748:00    91    FD    20    61    07 

CE 

50 

22 

04B8:EC    19    BD    30    IB    90    4C    lA    7C 

C750:1C    D0    F6    40    5B    07 

91 

FD 

E0 

C4C0:BD    9C    IB    9D    2C    19    BD   FC    OB 

0758:20    61    07    E8    D0    B6 

40 

2B 

FC 

C4C8:1B    9D    80    19    BD    70    lA    90    IC 

C760:C1   08    D0    02    E6    FE 

60 

00 

31 

C4D0:AC    lA    A9    13    9D    6C    18    A9    16 

C768:1F    18    00    3C    30    FE 

66 

FE 

FA 

C4D8:0C    9D    CC    18    A9    FF    60    AD    A6 

C770:3C    00    30    08    FE    91 

FE 

4A 

2B 

C4E0:8D    02    09    01    F0    F9    AD    00    05 

0778:80    01    18    FD    01    66 

80 

FD 

0C 

C4E8:DC    8D    67    IC    29    OF    C9    0F    IB 

C780:I8    80    01    52    FE    89 

FE 

10 

AD 

C4F0:D0    08    A9    00    8D    3A    18    8D    2D 

0783:00    21    10    FE    8A    FD 

02 

50 

F2 

C4F8:3B    18    4E    67    10    B0    0B    AC    CC 

C790:80    09    29   FD    04    52 

20 

11 

62 

0500:38    18    88   00    FB    F0    03    80    82 

0798:08    90    04    A5    20    09 

12 

50 

04 

0508:  3B    18    4E    67    10    B0    0B    AC    DD 

O7A0:02    4A    40    04     91    20 

01 

08 

23 

C510:3B    18    08    00    05    F0    03    80    E2 

C7Aa:80    FD    92    FE    08    00 

24 

14 

D6 

0518:38    18    4E    67    10    80    08    AC    ED 

C7B0:FE    4A    FD    01    10    80 

FD 

A5 

46 

C520:3A    18    38    00    FD    F0    03    80    32 

C7B8:FD    01    48    80    FD    52 

FE 

89 

59 

0528: 3A    18    4E    67    IC    B0    08    AC    70 

C7C0:FE    10    00    30    08    FE 

14 

FE 

3A 

C530:3A    18   C8   C0    03    F0    03    80    72 

C7C8: 08    00    26    07    03    E0 

08 

FD 

41 

0538;3A    18    AD    07    18    13    6D    3A    43 

0700:10    0A   FD    50    09   FD 

90 

08 

19 

0540:18   09   Al    B0    03    8D    07    18    FD 

C7D8:FD    10    08    24    10    08 

FD 

10 

5B 

C548:AD    10    18    18    6D    3B    18   09    85 

C7E0:08    24    10    08    FO    10 

09 

FD 

40 

0550:08    B0    03    8D    10    18    AD    07    E8 

C7Ea: 90    0A    FD    50    03    FD 

10 

07 

67 

0558:18    48   09    7A   B0    13    AD    10    20 

C7F0:C3    E0    00    10    FC    00 

00 

00 

83 

C560:D0    29    7F    8D    10   00    68    0A    06 

C568:18    69    0C    80    0E    00    4C    81    82 
0570:05    AD    10    00    09    80    8D    10   CE 

Galacticon— 64  Version 

_^ 

C578:D0    68    38    E9    7A    0A    80    0E    51 

BASIC  Section 

0580:00    AD    10    18    69    29    80    0F    7D 

0588:00   AD    60    IC    4A    4A    4A    4A   Bl 

XD    100    REM   COPYRIGHT    1988 

COMP 

0590:18    69    01    80    2E    00    AD    6C   F7 

UTE!     PUBLICATIONS, 

INC. 

0598 :1C    F0    13   CE    6C    IC    4E    67    95 

(2    SPACES) ALL    RIGHTS 

RE 

C5A0:1C    90    0A    AD    6D    10    09    03    EC 

SERVED. 

GE  110  IF  PEEK(642)=64  THEN190 
GM  120  PRINT" (CLR) (DOWN} 

{2  SPACES}YOU  MUST  TYPE 

": PRINT 
EJ  130  PRINT" (2  SPACES}POKE  64 

2,64:SYS58260":PRINT 
AG  140  PRINT"IN  DIRECT  MODE  BE 

FORE  LOADING  AND" 
RO  150  PRINT"RUNNING  THIS  PROG 

RAH. {2  SPACES) IF  YOU  JU 

ST" 
OB  160  PRINT"TYPED  THIS  IN,  SA 

VE  IT  TO  DISK  NOW" 
SB  170  PRINT" (BEFORE  YOU  DO:  P 

OKE  642,64:SYS58260)  . 
HR  180  STOP 
AA  190  IF  A=0  THEN  A=1:PRINT"L 

OADING  ML  FILE":LOAD"GA 

LACT,ML",8,1 
HP  200  PRINT" (CLR)" 
GS    210    X=14:Y=ia:GOSUB730:PRIN 

T"COPYRIGHT    1988" 
HM    220    X=8:Y-ll:GOSUB73a:PRINT 

"COMPUTE!     PUBLICATIONS, 
INC." 
PQ    230    X=12:Y=12:GOSUB730:PRIN 

T"ALL    RIGHTS    RESERVED." 
HF    240    X=12:Y=20:GOSUB730:PRIN 

T"CALCULATING  ORBITS" 
XD  250  DIM  X{255,2} ,Y(255,2) 
PQ    260    XC=172:YC=138:YR=140:XR 

=70 
JD    270    READ    IT , P, YR , XR : IF    P=-l 

THEN    GOTO360 
QH    280    GOSUB310:GOTO270 
MQ    290    REM    0RBITS{2    SPACES)*, X 

R,YR, PERIOD 
CG    300    DATA    0,127,125,80,     1,10 

0,100,60,     2,40,80,50,    - 

1,-1,-1,-1 
KC    310    C  =  0:FOR     1=0    TO    2*1'    STEP 

AF    320    X (C, IT)=SIN (I) *YR+XO: Y( 

C,IT)=COS (I) *XR+YC 
SF    330    T=4096+lT*512;T2=T+256: 

POKE    T+C,X(C,IT)AND    255 

:POKE    T2+C,Y(C,IT) 
HE    340    0=0+1: NEXT: RETURN 
AX    350    HI=0:BN=0 
ER    360    POKE    53281, 0:POKE    53280 

,12:P0KE    646,15 
FB    370   V2=135:L=0:SO=0:V=53248 
XJ    380    POKE    V+39,6:POKE    V+40,8 

: POKEV+41,10^ 
AD    390    POKE    2,L 
XQ    400    PRINT" (CLR) " :X=17:Y=5:G 

OSUB730:PRINT"LEVEL    ";L 

+1 
BS    410    X>='17:Y=6:GOSUB730;PRINT 

"SCORE  ";SC 
DJ  420  IF  HI>0  THEN  X=14:Y=8:G 

OSUB730:PRINT"OLD  HIGH 

{SPAOE}";HI 
XE  430  X=17: Y=10:GOSUB730:PRIN 

T"READY":FOR  1=1  TO  499 

:NEXT  I 
DF  440  X=17: Y=10:GOSUB73O:PRIN 

T"  SET  "  :FOR*  1  =  1  TO  399 

:NEXT    I 
JA    450    X=17: Y=10:GOSUB730:PRIN 

T"  GO (2    SPACES}" ;FOR    1= 

1    TO    299:NEXT    I 
CQ    460    POKE    V+21,V2 
QQ    470    SYS    49152:V2=PEEK(53269 

) :POKE    V+21,0 
KC    430    FOR    1=0    TO    2 
BP    490    T=  (PEEK {V+39  +  I)    AND    15) 

+BN:IF    T>15    THEN    T=15 
FC    508    POKE   V+39+I,T 
JB    510    NEXT 
OB    520    IF     (7    AND    V2)>0    THEN640 
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BS    530    PRINT"{CLR3" 

SK    540    X=14:Y=5:GOSUB730:PRINT 

"LEVEL    ";L+1 
BD    550    SC=SC+PEEK{251)+PEEKt25 

2)*256 
FF    560    X=14;V=6:GOSUB730:PRINT 

"SCORE  ";SC 
QK  570  IF  SOHI  THEN  HI=SC:X  =  1 

4:Y=7:GOSUB730:PRINT"  A 
NEW  HIGH  SCORE" 
HH  580  X=16:y=ll:GOSUB730:PRIN 

T"GAHE  OVER" 
KR  590  X=14:Y=13:GOSUB73a;PRIN 

T"PLRY  AGAIN  (Y/N)7" 
EE  600  POKE  198,0: REM  CLEAR  KE 

YHOARD  BUFFER 
KR  610  GETA$! IF  A5="Y"  THEN360 
CE  620  IF  A$="N"  THEN  END 
QP  630  GOTO610 
MS  640  SC=SC+PEEK{251)+PEEK(25 

2) *256 
JX  650  L=L+1:IF(L  AND  3)>0  THE 

N390 
SS    660    POKE    V+21,0 
MD    670    PRINT"(CLR)":X=7:Y=12:G 

OSUB730:PRINT"GET    READY 
FOR    SAFE    ROUND!" 
QK    680    FOR    1=1    TO    1499:NEXT    I 
AS    690    POKE    53281, 6:P0KE    49793 

,0:POKE    V+21,V2 
PM    700    SYS49152:L=L  +  l:BiJ=BN  +  l 
SQ    710    POKE    53281, 0:POKE    49798 

,3: POKE   V+21,0 
QC    720    GOTO390 
AR    730    POKE    781,Y:POKE    782, X:P 

OKE    783,0:SYS65520:RETU 

RN 

Galacticon— Apple  Ver- 
sion—Machine Language 
Section 


91 

90081 

B010] 

B018t 

80201 

80281 

S030I 

60381 

80401 

80481 

80501 

S0SBI 

6060: 

B06BI 

B070 

B078 

6080 


80<70 


B0A0 
80Ae 


B0C0 
B0Ca 
S0D0 

a«De 


e0F6 

8100 
6108 
8110 
8118 
8120 
B12B 
B130 
8138 


4C  AD  83 
88  20  B0 
6B  83  20 
20  0C   B7 

85  20  A0 
S4  83  AD 
F9  AD  83 
10  7C:  SD 
BD  DF  8A 
8A  BD  40 
70  7C  80 
4C  F9  B0 
91  EC  4C 
0A  3B  AS 
80  AO  00 
EC  91  EC 
0A  0A  3B 

86  80  AD 
CA  BA  91 
00  91  EC 
BA  Ae  B9 
AD  E3  BA 
60  E4  BA 

80  BD  91 
SC  80  8D 
AD  E3  BA 
C6  BA  B9 
AD  EZ  BA 
BD  ES  8A 

81  6B  18 
07  ra  ED 
60  A2  00 
C8  EB  CC 
ED  18  69 
8A  F0  13 
EE  E0  BA 
80  ES  BA 
E0  BA  AB 
DF  BA  as 
SC  BA  83 


4C  FS 
81  20 
96  83 
20  ID 
BS  20 
00  C0 
7D  F0 
El  BA 
BD  20 
7C  BD 
E3  BA 
BD  CA 
00  81 
4E  BS 
6S  3D 
4C  00 
6S  4E 
00  6S 
EC  4C 
4C  00 
00  62 
A8  B9 
BD  3D 
80  B9 
73  S0 
AB  B9 
S4  BA 
4A  4A 
0A  0A 
63  ED 
ES  BA 
A0  00 
C4  BA 
04  83 
C£  ES 
20  27 
4C  FB 
B9  84 
EC  B9 
ED  60 


BB  20 
6B  81 
20  E4 
88  20 

59  66 
C9  9B 
DC  60 
BD  30 
7C  BD 
ES  8A 
20  9e 
BA  11 
AS  4E 
4E  BO 
CA  8A 
Bl  AS 
BS  4E 
6S  4E 
00  81 
81  AD 
8D  E4 
00  7C 

80  8D 
F8  7B 

60  90 
4C  BA 
BD  C4 
4A  4A 
48  20 
83  ED 
BD  ES 
4C  97 
D0  F6 
ED  CE 
BA  10 

81  A9 
80  60 
BA  18 
6C  8A 
BD  C» 


60  3A 
20  53 
8S  SI 
3C  C6 
20  EB 
F0  3F 
BD  9B 
7C  38 
EZ  IE 
BD  90 
80  2B 
EC  79 
0A  38 
72  01 
11  A£ 
4E  S6 
BD  19 
3D  BF 
A9  A9 
El  A3 
BA  E5 
18  34 
76  4A 
8D  CD 
60  F4 
BD  17 
BA  F2 
4A  B9 
27  EC 
A9  29 
BA  80 
80  BD 
AS  B2 
C6  BD 
E3  41 
07  B7 
AD  C9 
6D  DA 
60  47 
7C  DS 


B140I 

BD  El  BA  BD  E0  7C  BD  DF  A3 

B3F01 

ei4Bi 

BA  BD  D0  7C  80  E2  BA  BD  AC 

SSFSi 

81501 

F0  7C  80  E0  8A  BD  60  7D  34 

6400! 

BlSBl 

8D  E3  BA  20  Ce  80  4C  F9  49 
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H 

450 
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89 

E8 

E0 

78 
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88781 

F3 

A2 

00 

BE 

CA 

BA 

A0 

23  FB 

rights  rss«rv«d. 

4B 

460 

88801 

AD 

CA 

8A 

90 

00 

62 

EB 
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K  110 

0*  >  CHR«  (4)1  HOME  :  HTA 

8888) 

0E 

88 

10 

F4 

AD 

CA 

8A 

18  09 

B  li  VTAB  9s  PRINT  "Copyr 

21 

88901 

69 

04 

8D 

CA 

8A 

10 

E7 

AO  C7 

ight  1988  COMPUTE!  Public 

470 

88981 

BF 

SA 

SD 

30 

7C 

80 

A0 

7C  Ba 

ations" 

e8A0i 

80 

E0 

7C 

80 

3F 

7C 

AD 

C0  21 

7ft  I2fl 

HTAB  111  VTAB  13l  PRINT  " 

G6A8I 

8A 

80 

40 

7C 

80 

B0 

7C 

BD  E7 

All  rights  r»s«rvsd." 

88801 

E0 

7C 

8D 

4F 

7C 

A2 

04 

A9  IB 

Bl  130 

A  >  FRE  t0>i  IF  A  <  0  OR 

9! 

SBBBl 

02 

90 

30 

70 

8A 

9D 

70 

7C  38 

A  >   4500  THEN  PRINT  1  PRI 

480 

8eC0i 

CA 

10 

F4 

20 

61 

81 

80 

43  48 

NT  "You  must  typ*  HinErl  i 

BSCBi 

70 

20 

61 

81 

60 

43 

7D 

BD  E9 

6572  in  dlrsct"!  PRINT  " 

(I 

490 

BBIMl 

44 

70 

A9 

20 

85 

E6 

49 

60  S3 

motSm   ba-fors  running  this 

BSDSi 
88E0I 

BD 
A9 

DC 
04 

8A 
80 

A9 
DE 

IE 
8A 

80 
A9 

DO 
IF 

8A  41 
BD  2E 

EI  140 

program."!  STOP 

PRINT  1  PRINT  "Loading  al 

Di 

500 

BSESl 

84 

7D 

A9 

04 

80 

89 

70 

A9  48 

flla"!  PRINT  D*"BLOAO  BA 

1> 

310 

88F0I 

06 

80 

7F 

7C 

60 

A0 

19 

20  F7 

LACT.ML" 

PRINT  "Calculating  orbits 

7C 

320 

B8F81 
89001 

71 
89 

B9 
2C 

A0 

10 

12 

C0 

A9 
A0 

01 
17 

20 

A9 

71  5D 
00  AS 

i3  130 

76 

530 

89081 

BD 

78 

04 

80 

78 

05 

8D 

FB  43 

89101 

05 

A9 

9F 

80 

FB 

04 

A9 

00  08 

It    160 

DIM  XA(2>,YAC2)iPI  -  3.14 

89181 

20 

71 

89 

A0 

17 

A9 

01 

20  S4 

1 39263 

37 

340 

89201 

71 

89 

2C 

00 

C0 

60 

A0 

14  80 

Bi  170 

FOR  I  -  0  TO  2t  READ  XA ( I 

8928 

20 

71 

89 

A2 

00 

20 

9B 

84  3F 

),YA<I)l  NEXT 

12 

350 

8930 

A9 

00 

BD 

E7 

BA 

80 

10 

7C  6F 

D4  1B« 

t   DATA  7168,7280,7392,7342, 

8938 

A0 

C4 

B9 

B8 

03 

8D 

10 

70  7B 

7692,7942 

A3 

560 

8940 

4A 

2E 

10 

7C 

4A 

80 

30 

7C  33 

n   I9i 

1  XC  -  79lYC  -  76 

8948 

2E 

10 

7C 

B9 

38 

04 

48 

80  91 

2i  201 

1  FOR  N  -  0  TO  2 

«  YR  +  XCtTY 
XR  -f  YC 
C,TXi  POKE  Y 


P  *  2  T 


READ  P.XR.YRlC  -  0 

FOR  t  -  0  TO  2  S  PI  STH» 

PI  /  P 

TX  -  SIN  tl) 
■■  COS  CI)  * 

POKE  XA(N)  + 

A<N)  +  C,TY 

C  -  C  +  li  IF  C 

HEN  I  -  2  «  PI 

NEXT  I 

NEXT  N 

DATA  36,90,50,  73,55,38, 

125,68,63 

MF  -  61HSPD  -  23tR  -  5iLE 
V  -  liKF  -  9lC  -  3Z774I  P 
OKE  32128,01  POKE  32129,0 

I  POKE  32132,31 

HOME  I  HTAB  2l  VTAB  4i  PR 

INT  "IVasB  K  for  ksytaoard 

,  a  for  Joystick,"!  HTAB 
Bl  PRINT  "M  for  Mousa" 
A  -  PEEK  <49152)i  IF  A  - 
235  OR  A  >•  203  THEN  US  - 
01  OOTO  390 

IF  A  -  203  OR  A  -  237  THE 
N  PRINT  "mousa  Balsctsd"! 
US  -  2Sat    SOTO  370 

IF  A  -  234  OR  A  -  202  THE 
N  US  -  1)  PRINT  I  PRINT  " 
Joystick  sslactad"!  BQTO 
380 

SOTO  310 

HTAB  111  VTAB  7i  PRINT  "M 
E  R"i  HTAB  11>  PRINT  " 
B      F"l  HTAB  111  PRINT 

■X   C   V"l  PRINT  t  PRINT 

"  spacs  bar  to  flr«" 
R  -  61MSPD  -  I61  BOTO  380 
CALL  32771 

POKE  32130,  riFl  POKE  32131 
,M3PDl  POKE  32138, Ri  POKE 

32136, KFl  POKE  32134, US 
FOR  I  -  1  TO  29991  NEXT 
HOHE  I  HTAB  101  VTAB  3l  P 
RINT  "scors  "|  PEEK  (3212 
8)  +  PEEK  (32129)  «  236 
HTAB  111  VTAB  7l  PRINT  "1 
>val  "LEV 

IF  US  <  >  0  THEN  HTAB  12s 
VTAB  9i  PRINT  "prass  fir 
■  to  cootlnua'i  CALL  3276 
81  BOTO  450 

HTAB  12l  VTAB  9l  PRINT  "r 
aturn  to  contlnua" 
A  "  PEEK  (49152)1  IF  A  < 
>    141  THEN  440 
CALL  Cs  TEXT  I  HOTE  sC  - 
32780 

IF  PEEK  (32133)  -  1  THEN 
920 

HTAB  9l  VTAB  9l  PRINT  "ga 
ma  ovar"t  HTAB  2i  VTAB  11 
I  PRINT  "final  scora  "  PE 
EK  (32128)  +  PEEK  (32129) 

t  2S6"    laval  "LEV 
HTAB  4l  VTAB  13i  PRINT  "P 

lay  again    (y/n>?" 

A   -    PEEK     (49152) I     IF    A   - 
249   OR  A  -  217   THEN  290 
IF   A  •   238  OR  A   -  206  THE 
N   END 
SOTO  490 

MF  -  MF  +  Ij  IF  MF  >  14  T 
HEN   MF  >    14 

LEV  -  LEV  +  IsMSPD  -  MSPO 
5l  IF  MSPO  >  31  THEN  P 
OKE    32132,63 

IF  MSPD  >  63  TKCN  POKE  32 
132,127 

KF   -  KF   +  LEVI    IF  KF   >  23 
5   THEN  KF    -   235 
OOTO   380 
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Galactlcon— Atari  ST  Version 

'  Copyright  1988  COHPUTE!  PubllCBtionv,  Inc.* 

•    All  Rights  RB««rVMi« 

Din  xX(5,200),yX(S,20«),SKX(3«>,>yX(3*>« 

DIH  palX<lS),«X(32S54/4>,-fxX(7),fyX(7>4 

Din  piiX(2S>  ,pyX<2S)  ,ypX(2S>  ,NpX<2S)  ,ll!  (S)« 

Din  m»    lX(lS>,m  2XClS>,lsX(lS)« 

DIH  hit! (2S>,pJ«(2S),pt«(S)« 

BRAPHMODE  24 

r*zX-XBIQS(4><' 

■tBrti4 

91  nit  g»M< 

DO* 

9caunt  mK* 

EXIT  IF  p_cX-5* 

nOUSE  gxXpgyX.gkX* 

IF  gkX-2* 

9M«lt« 

ENDIF* 
SWAP  aX.bX* 
V9YNC* 

VOID  XBI08(3,Ll«X,LibX,-l)« 
SPUT  •  •crn44 
pX-e*  ~ 
NHILE  pX<54 
IF  d! <pX)« 

PUT  MX<pX,cX>,yX<pX,cX),pt«<pX)« 
ENDIF4 
INC  pX« 
HEND4 

PUT  fp_l%,  191,b»<- 

IF  <TIHER-t)/200>2  AND  fp    1X<2S9« 
PUT  fp  IX, 191,B«4 
ADD  fp.lX.KK 
t-TinER« 
ENDIF« 
INC  cX4 
IF  cX>20«4 

cX-l* 
END IF* 

SPRITE  gt»,gxX,gyX* 
9mavm_it icX) * 
IF  gkX-1   AND  fXOgkX* 

9flrm  ItCgxX.gyX)* 
ELSE* 

fX-gkX« 
EM>IF« 
LCXIP* 
PAU8E  204 
IF  MOT   Hln!4 

PRINT   AT<1«,13)|"A11    Pl«n«t>   dntroyMi!  ■** 
■car*«-*Fln«l    Scotbi    "-tSTRtfacX)* 
lX-20-INT(  (LEN(lW«) /2)  )* 
PRINT   AT(lX,10)|Bcar««* 
ySYNC* 

VOID  XBIOS(9,LiaX,LtmX,-l>4 
Staps* 
ENDIF* 
SHOHn* 
IF  win!* 

8m1 n_r  outl n** 
ENDIF* 
IF  scX>pacQr»X* 

PRINT  AT (13, IS) I "A  Nmw   Record!"* 

8r*c_sono* 

•lrti-"ISav»  Racord  Scora?"* 

ALERT  2,alrt«,l,''8ava  ltlNo*,b* 

IF  b-l« 

DEFMOUSE  2* 
OPEN  "O-.Cl.d** 
PRINT  tl,naiw«* 
PRINT  «l,mcX* 
CLOSE  41* 
DEFMOUSE  0* 
ENDIF* 
ENDIF* 
CL8* 

lrt«»"l   Play  Again?"* 
ALERT  2, lrt«, l,"Ya«IBuit",b* 
IF  b-1* 

GOTO  start* 


ENDIF* 
CLB* 

RESERVE  FRE<»)+32fl««* 
9r_pal* 
END* 

PROCEDURE  cexint_«»* 
LOCAL  IX* 
p  cX-«* 
lX-0* 
WHILE  1X<S* 

IF  NOT  d! (IX)* 

INC  p  cX* 
ENDIF* 
INC  IX* 
HEND* 
RETURN* 

PROCEDURE  •ov»_lt(cX>* 
LOCAL  IX* 
llX-«* 
REPEAT* 

IF  hit! (IIX)* 

SOTO  ■nd^aova* 
ENDIF* 

ADD  ypX<iXX),pyX(ilX)* 
ADD  KpX(llX),pMX(llX)* 
IF  xpX<llX)>3i9   OR   xpXdXXXa* 
SaxiaiilX)* 
KpX(llX)>160* 
ypX(llX)-100* 
ENDIF* 

IF    ypX(llX!>16S  OR   ypX(llX><10* 
SaxiadlX)* 
xpX(llX>«I60* 
ypX(llX>-100* 
ENDIF* 

SPRITE  pJ*(ilX>,xpX<llX},ypX(llX>* 
IF   xpX(llX)>170  OR  xpX(ilX)<lS0  AND  ypXdl 
XX90   OR   ypX(ilX)>110* 
lX-0* 
REPEAT* 

IF  (NX(lX,cX)-xpX(llX><S  AND  MX(iX,cX> 
-xpX<lIX>>-15)  AND  (yX(lX,cX)-ypX(ilX) 
<2  AND  yX(iX,cX)-ypX(llX>>-lS)  AND  d!< 
IX)* 

d< (IX) -FALSE* 

PUT  xX(iX,cX),yX(lX,cX),ax** 
VOID  XBI0S(32,LiaK_lX)* 
iX-4* 
ENDIF* 
INC  IX* 
UNTIL  1X>4* 
ENDIF* 
•nd_iKivai* 
INC  IIX* 
UNTIL  llX-laX+1* 
RETURN* 

PROCEDURE  hlt_ao<Mithlng(llX,cX)* 
LOCAL  1 %^ 

IF  xpX(llX)>170  OR  xpX(ilX)<190  AND  ypX(ilX) 
<90  OR  ypX(ilX)>110  AND  hlt!(ilX)<>t* 
iX-0* 
REPEAT* 

IF  (NX(lX,cX)-xpX(llX)<lS  AND  xXdX.cX)- 
xpX(ilX)>-lS)  AND  (yX(lX,cX)-ypX(llX)<t9 
AND  yX(lX,cX)-ypX(ilX)>-lS)  AND  d!(iX}* 
d! (iX) -FALSE* 

PUT  xX(lX,cX>,yX(lX,cX>,ax«* 
VOID  XBI08(32,Ll«x_lX)* 
lX-4* 
ENDIF* 
INC  IX* 
UNTIL  1X>4* 
ENDIF* 
RETURN* 
PROCEDURE  axlmdlX)* 

pyXdlX) -RANDOM (•pX>-INT(spX/2>* 
pxXdl  X) -RANDOM  (apX) -INT  (■pX/2>  * 
IF  pMXdlX}-0   AND  pyXdlX)-0* 

9axlBdlX)* 
ENDIF* 
RETURN* 
PROCEDURE   flra_lt(gxX,gyX)* 
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LOCAL   1X4 

t-TIHER« 

IF    (gMX<170   AND  gxX>lS0)    AND    {gyX<110   AND   oy 

X>90)« 

GOTO  no  fir»« 
ENDIF4 
IF  *p_lX<b9* 

GOTO  no  flr«4 
ENDIF4 
lX-14 
REPEAT* 

'fxX(lX)-g}(X« 

fyX(tX>-gyX* 

fX-gkX<- 

ADD   IX, 24 
UNTIL    iX>7« 
VOID   XBI08<32,LilaX)* 
COLOR   2* 

POLYLirC   e.fxXO.fyXO* 
Wilt* 

SUB  fp.ix.ia* 

no_+lrBi4 
RETUFiN* 

PROCEDURE  hit* 
LOCAL  IX* 
lX-0* 
REPEAT* 

IF    (gMX-MpX<iX)<5   AND  gxX-KpX(lX> >-5)    AND 
<gyX-ypX<lX)<S   AND  gyX-ypX<iX) >-3)    AND  hit 
! (lX}-e* 

8PUT  a_«:rn«* 

•cX-acX+ ( 10*laX>  *>pX* 

>c«-8TR«(>cX>* 

lgX-40- <LEN (Bc*) +7) * 

PRINT  AT<loX,23)|"8cor»i  -+»c** 

SGET  ■  scrn«* 

hit! <iX>-TRUE* 

SPRITE  pJ«(iX)4 

PUT  NpX(lX>,ypX(iX>,«t«* 

VOID  3(BI08(32,Li»(_2X)* 

COLOR  2* 

POLYLINE  8,fNX(),fyX(>* 

INC  cauntX* 

IF  CDuntX-laX-*-!* 

9n*>(t_l«v«l* 
ENOIF* 
1X-1*X* 
ENDIF* 
INC  iX* 
UNTIL  iX>laX* 
RETURN* 
PROCEDURE  nMt.lBval* 

ARRAYFILL  hi  t ! ( > , FALSE* 
ARRAYFILL  NpXO.lJid* 
ARRAYFILL  ypX 0,100* 
■pX-»pX+laX* 
ilX-r0* 
IF  gaa«!* 
INC  IbX* 
IF  laX-26* 
Mini -TRUE* 
QGTO  B.lvl* 
ENOIF* 
PAUSE  20* 

VOID  XBIOS<S,LibX,LibX,-l)* 
DEFTEXT  16,0,0,6* 

l«v«>i"Entarlng  Laval  ■•+STR«(laX)* 
1 X«20-INT ( (LEN (1 av«> /2> ) * 
PRINT  AT<8,clX>|cg»* 
PRINT  ATU0,  lX>|lav«* 
a»ong* 
countXHV* 
8PUT  ■  >crn«* 

PRINT  AT (2, 23) J "Laval  I  "|laX* 
88ET  •_«crn«* 
ENDIF* 
FOR  iX>0  TO  laX* 

SaxiadX)* 
NEXT  iX* 
VOID  FRE(0>* 
a  Jlvll* 
RETURN* 


PROCEDURE  Inlt  gam** 
IF  ra2X<>0* 

alrt«-'Plaa>a  awitch  tolLoM  Raaolution.  *** 

ALERT  3,alrtt,  l,-OK'',b* 

END* 
ENDIF* 
HIDEH* 
RESTORE* 
IF  NOT  gaiaaf* 

RESERVE  FRE(0> -32000* 

8BavB_p«latta* 

•X-XBI08(3)* 

bX-VARPTR(aX(0)>-f2SS  AND  ttHFFFF00* 
ENDIF* 
win (-FALSE* 
gaaa! -FALSE* 
CL8* 

9planatB* 
cauntX-0* 
p_cX-0* 

ARRAYFILL  d!0,TRUE* 

la*-"l"* 

ilX-0* 

CL8* 

SET  1,1, 90,50, a«* 

DEFTEXT  2, S, 0,32* 

TEXT  60,80, "Gal actlcon!'* 

DEFTEXT  7,0,0,4* 

TEXT  20, 100, "Copyright  1988  COMPUTE!  Publlca 

tiona.  Inc."* 

Srac  aong* 

DEFMOOSE  2* 

driva-0En008(tiH19)* 

d«-DIR«(drlva>* 

d«-CHR«(driva+65)-^"i\"-fd*-«-"galacti.tMt"* 

IF  EXIST(d«)* 

OPEN  -I-,«l,d*« 

DO* 

EXIT  IF  EOF(ttl)* 
INPUT  •l.pnana** 
INPUT  «l,pBcoraX* 

LOOP* 

CLOSE  «1* 

DEFMOUSE  0* 

DEFTEXT  2,0,0,6* 

racord«-"Racordi  "+8TR«<p«coraX)+"  Scorad 

by  "-)^naaa«* 

TEXT  30, 120,racard«* 
ENDIF* 

ainit_arraya* 
9gt* 

Sprojact* 
SaN.l* 
9aM_2* 
SI  a* 

PRINT  AT(S,20)|« 
PRINT  "Entar  your  naaai  "i* 
FORM  INPUT  10  AS  n«l»a«* 
cg*-"CangratulatiDnB,  "-Hiaaa*-!-"  !  "* 
clX-20-INT(LEN(cg«>/2>* 
naaa*-UPPER« (na«a*) * 

BCX-0* 

gat  1 avail* 

PRINT  AT (S, 22) I "Sal act  laval  (1-10>7"|* 

FORM  INPUT  2  AS  la«* 

laX-VAL <!•«)* 

IF  laX<l   OR  laX>10* 
GOTO  gat_laval* 

ENDIF* 

CL8* 

alrt*-" (Difficulty  Factor"* 

ALERT  2,alrt«, l,"EaaylMadlHard",b* 

BpX-fa«4* 

Snaxt_laval* 

gaaa! -TRUE* 

CL8* 

Saat_«tar* 

8a  acraan* 
RETURN* 
PROCEDURE  aava.palatta* 

FOR  lX-0  TO  15* 
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palX(lX>-XBICI8(7,HliX,Hl-l>« 
NEXT  i7.« 
RETURNS 

PROCEDURE  r_pal4 
8HOim<r 
FOR   iX-0   TO    IS* 

SETCOLOR  iX,pal7.<lX>« 
NEXT  1X4^ 
RETURN* 

PROCEDIME  Mit.star* 
COLOR  164 
FOR  iX'0  TO  30« 

>MX(iX)-RMWOH(319)+14 

ayX(iX)-RANI}Of1(  l&e)-)-14 

PLOT  ■xX(iX},>yX(iy.)4 
NEXT  iX« 
RETURN* 

PROCEDURE  planats4 
ckX-0« 
FOR  tX-l  TO  32<- 

READ  rd« 

colr«-colr»+CHR»(rd>« 
NEXT  t%« 

VOID    XBI03(&,LiVARPTR(colr«>)< 
FOR   mX>0   to   4« 

READ   lanfMfhfr* 

FOR   1X>1   TO   Iwi* 
READ  rd4 
ckX-ckX+rd« 
ptt (MX)-pt« (mX) +CHR« (rd) 4 

NEXT  iX4 
NEXT  NX4 
IF  ckX<>4764i4 

PRINT  CHR«<7>|"Error  in  data  atataiwnta"* 

PAUSE  2S04 

8rjal4 

EDIT4 
ENDIF4 

DATA  e,»,7,e,7,4B,7,Ba,7, ll2,4,112,e, il2,«,l 
17, •,119, a, 87,0, 39,0, 7, 7, 83, 5, 32, 7, 112, 7, 119 
4 

DATA  78,9,8,04 

DATA  0,9,0,8,0,4,0,0,0,0,0,0,0,0,30,0,0,0,0, 
0,0,0,63,0,0,0,0,0,0,0, 127,126,0,0,0,0,0,0,1 
27,128,0,0,0,0,04 

DATA  0,127,128,0,0,0,0,0,0,63,0,0,0,0,0,0,0, 

30,0,0,0,0,0,0,0,0,0,0,0,0,0,0,04 

DATA  278,19,16,04 

DATA  0,19,0,16,0,4,0,0,0,0,0,0,0,0,0,0,0,0,0 

,0,0,0,0,0,0,0,1,248,0,0,0,0,0,0,0,0,0,0,0,0 

,1,248,7,254,04 

DATA  0,0,0,0,0,0,0,0,0,0,0,1,232,51,253,0,0, 

0,0,0,0,128,0,0,0,60,0,63,234,3,233,0,0, 160, 

0,160,0,64,0,0,0,28,0,31,2274 

DATA  33,233,0,0,32,0,224,0,192,0,0,0,124,62, 

127, 195, 3, 193, 0, 60, 96, 0, 224 , 0, 128, 0, 0,0, 77, 1 

24,66, 131,30, 131,61,124,32,0,224,0,192,0,0,0 

,984 

DATA  253, 101,1,29,0,26,234,192,0,192,0,32,0, 

0, 0, 72, 62, 71 ,  192,  S5, 193, 56,  62, 0, 0, 0, 0, 224, 0, 

0,0,32,30,39,224,95,223,24,31,0,0,0,0,224,04 

DATA  128,0,24,14,31,240,39,241,0, 15,0,0,0,0, 

192,0,0,0,62,0,63,248,1,233,0,7,0,0,0,0,192, 

0,128,0,31,13,31,255,0,240,0,0,0,0,04 

DATA  0, 128,0,0,0,0,6,0, 126,7,248,0,0,0,0,0,0 

,0,0,0,0,0,12,0,12,1,240,0,0,0,0,0,0,0,0,0,0 

,0,0,0,0,0,0,0,04 

DATA  0,0,0,0,0,0,0,04 

DATA  294,19,17,04 

DATA  0,19,0,17,0,4,0,0,0,0,0,0,0,0,0,0,0,0,0 

,0,0,0,0, 120,1,248,0,120,1,248,0,0,0,0,0,0,0 

,0,0,126,7,254,0,126,74 

DATA  234,0,0,0,0,0,0,0,0,0,28,31,253,0,28,31 

,235,0,0,128,0,0,0,128,0,0,0,63,233,15,0,48, 

255,0,0, 192,0,0,0,192,0,0,0,39,2334 

DATA  31, 128,34, 127,0,0, 192,0,0,0, 192,0,0,0, 1 

23,233,31,220,100,33,0,0,224,0,0,0,224,0,0,0 

,123, 235, IS, 232, 116, 3, 0,0, 224, 0,0, 0,224, 0,04 

DATA  0,123,2^,15,248,114,7,0,0,224,0,0,0,22 

4,0,0,0,123,255,13,248,116,7,0,0,224,0,0,0,2 

24,0,0,0,127,235,15,240,112,13,0,0,224,0,0,0 

4 


DATA  224,0,0,0,127,255,7,240,120,13,0,0,224, 
0,0,0,224,0,0,0,63,235,3,184,60,71,0,0,192,0 
,  0, 0, 192, 0, 0, 0, 63, 233, 3, 8,60, 247, 0, 0, 1924 
DATA  0,0,0,192,0,0,0,28,235,3,8,31,247,0,0,1 
28,0,0,0,128,0,0,0,7,234,1,128,6,126,0,0,0,0 
,0,0,0,0,0,0,1, 248, 0, 128, 1 , 1204 
DATA  0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0(0 
,0,0,0,04 
DATA  86,10,9,04 

DATA  0,10,0,9,0,4,0,0,0,0,0,0,0,0,0,0,31,0,0 
,0,0,0.8,0,^,  128,8,0,8,0,2,0,  123,  192,2,0,2, 
0, 16, 0, 1 1 1 ,  192, 16, 0, 164 

DATA  0,2, 128, 123,64,2, 128,2, 128,32,0,75, 192, 
32,0,52,0,0,0,63,128,0,0,0,0,0,0,31,0,0,0,0, 
0,0,0,0,0,0,0,0,04 
DATA  326,23,19,04 

DATA  0,23,0,19,0,4,0,0,0,0,0,0,0,0,0,0,0,235 
,0,212,0,1,0,0,0,0,0,233,0,0,0,48,0,48,0,48, 
0,48,0,0,0,0,3,255,04 

DATA  0,0,48,0,48,192,48,0,48,0,0,0,0,15,255, 
0,0,0,48,0,48,240,48,0,253,0,0,0,0,31,233,0, 
0,0,0,0,255,248,254,0,97,0,0,0,04 
DATA  63,255,0,0,0,48,0,48,252,48,0,48,0,0,0, 
0,63,253,0,0,0,48,0,48,252,48,0,48,0,0,0,0,1 
27,235,0,0,0,235,0,214,234,1,0,233,04 
DATA  0,0,0,127,255,0,0,0,48,0,48,234,48,0,48 
,0,0,0,0,127,253,0,0,0,48,0,48,254,48,0,48,0 
,0,0,0,127,255,0,0,0,48,0,253,254,2164 
DATA  0,0,0,0,0,0,127,253,0,0,0,254,0,97,234, 
97 , 0, 48, 0, 0, 0, 0, 127, 233, 0, 0, 0, 48, 0, 48, 254, 48 
,0,48,0,0,0,0,63,255,0,0,0,48,04 
DATA  48,232,48,0,48,0,0,0,0,63,253,0,0,0,253 
,0,234,232,97,0,97,0,0,0,0,31,255,0,0,0,48,0 
,48,248,48,0,48,0,0,0,0,15,235,0,04 
DATA  0,48,0,48,240,48,0,48,0,0,0,0,3,255,0,0 
,0,233,0,254,192,0,0,255,0,2,0,0,0,233,0,0,0 
,48,0,48,0,48,0,48,0,0,0,0,04 
DATA  0,0,0,0,48,0,48,0,48,0,484 
RETURN4 

PROCEDURE  r*c_u>ng4 
RESTORE  rac  sang4 
DG4 

READ  nX,oX4 
EXIT  IF  nX-04 
SOUND  l,15,nX,oX,54 
L00P4 

SOUND    1,15,1,6,184 
SOUND    1,04 
rac    •arvat4 

DATA  8,4,1,4,10,4,8,4,1,4,1,54 
DATA  8,4,1,4,10,4,8,4,1,4,1,34 
DATA  8,4,1,4,10,4,8,4,1,4,3,5,1,54 
DATA  3,3,5,3,6,5,8,5, 10^3, 12,3,0,04 
RETURN4 

PROCEDURE  init  arraya4 
FOR  pX-0  TO  44 

(SAD  «c,vc,yr,Kr,cX4 
FOR  1-0  TO  2«PI  STEP  PI/10e4 
>iX(pX,cX)-lNT(BIN<l)tyr+)ic)4 
yX(pX,c*>-lNT<COS(i>«jir+vc>* 
INC  eX4 
IF  cX>2004 

cX-04 
EN0IF4 
NEXT  14 
NEXT  pZ4 
cX>14 
RETURN4 

DATA  1^,75,  150,75, 0«- 
DATA  155,78,145,74,1304 
DATA  120,80,115,65,1004 
DATA  120,80,113,69,204 
DATA  130,73,120,65,704 
PROCEDURE  at4 

gt«-HKI«  (7) -HtKI*  (7)  4 
gt*-ot«+HKI«(0>4 
gt«-gt«-H«:i«(0)4 
gt««gt«-H«:i«(13)4 
FOR  iX-1  TO  164 
READ  fg,bg4 

gt«-gt«-*^«CI«  (bg  >  ■H1KI«<-f  g>  4 
NEXT  iX4 
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FOR    1K««   TO   7^ 

READ   fMX(iX>,fvX<iX>« 

NEXT  1X« 

DATA  33026,0, 16^44, 0,S456, 0,4368,0,256, 0,0,0 

,0,0,63550,04 

DATA  0,0, 0,0,256,0,4368, 0,6456,0,16644,0,330 

26,0,0,0<' 

DATA  1,1,0,0,1,199,0,0,319, 1,0,0,319,199,0,0 

« 
RETURNS 
PROCEDURE  projects 

pJ*-MKI«  (S> -tiKIt  <7) « 

pj«"pj«-t+*:i«<0)« 

pJ«-pJ«-»t1KI«(0)<' 

pJ»-pJ«+«KI«(4>* 

FOR  iX-1  TO  164 
READ  fg,bg4 
pj*-p J«-»t1KI«  <bg)  -t^IKI*  (f  g)  4 

NEXT  1X4 

FOR  iX-0  TO  2S4 
pJ«<iX)-pJ«4 

NEXT  1X4 

DATA  0,0,0,0,0,0,0,0,1166,0,672,0,448,0,2032 

,04 

DATA  448,0,672,0,1168,0,0,0,0,0,0,0,0,0,0,04 
RETURN4 

PROCEDURE  H«it4 
SWAP  •X,bX4 

VOID  XBIOS<S,LiaX,LibX,~l)4 
SPUT  ■  kcrn«4 
D04 

EXIT  IF  riOU8EK-14 
L00P4 
REnjRN4 

PROCEDURE  ■i_mcrM*n4 
fp  1X-2S94 
FOR  iX-0  TO  904 

COLOR  RANDan(4>+14 

r«RANDan<5>-*44 

y-160-<8IN<lX>*r>4 

p-100-(COS(lX)»r)4 

DRAM   160,100   TO   y,p4 
NEXT   iX4 

SET    150,90, 170, 110,  •)(«4 
PRINT  AT(2,23)|''L«VBli    ■'|1bX4 
PRINT  AT(51,23>|-Scorai    00-4 
COLOR    164 
DEFLINE   0,34 
RBOX    1,170,319,1994 
DEFLINE   0,14 
BOX   50,190,270,1954 
SET  259,191,269, 194, b«4 
DEFFILL   24 
FILL  :S, 1914 
BET  259, 191,269, 194, ««4 
DEFTEXT   2,0,0,44 
TEXT  35, 194,  •'0X"4 
TEXT  273, 194,-10«X"4 
DEFTEXT    164 

TEXT  115, 187, "Enorgy  LavMl"4 
8GET  a_mcrn*4 
RETURN4 

PROCEDURE   mx    14 
RESTORE   •x_14 
•M_1X-VARPTR(B)I_1X(0>)4 
FOR   JX-0  TO    144 

READ  •]<_1X(JX)4 
NEXT   JX4 
■x_lt4 

DATA  tchBe,«ihl03,l(h2dc,tih305,tih4d0,l<h507,tih61 
7,lrfi7c74 

DATA  t<heif,t<h91f,lihal'r,tihb20,lchc4B,t<hd09,tihf 
f004 
RETURN4 

PROCEDURE   •ii_24 
RESTORE  mx   24 
•x_2X-VARPTR C«M_2X (0) ) 4 
FOR   iX-0  TO   144 

READ  •M_2X(iX)4 
NEXT  iX4 
•x_2i4 


DATA  tih«e,lihl03,Ui2dc,tch305,«rfi4d0,tch9a7,lch60 
d,tch7c74 

DATA  Ui81f,lih91'f,tchalf ,l<hbSe,lchclb,titid00,lihf 
f004 
RETURN4 
PROCEDURE   1*4 
RESTORE    lm4 
1 aX^VARPTR ( 1 >X < 0) ) 4 
FOR    jX-»   TO    144 

READ  lBX<iX>4 
NEXT  iX4 
l«i4 

DATA  tihaa,lchl00,t<h282,Iih300,tih47e,t<hS00,tih6a 
44 

DATA   I<h7«l,tch81f ,tih91'f,t<half ,lihbc4,l<hc«9,(>hd 
»f  ,lchff004 
RETURN4 

PROCEOUFS  >ang4 
MAVE  0,04 
RESTORE  sang4 
D04 

READ  vlX,durX,octX4 

EXIT    IF  vlX«04 

SOUND  l,15,vlX,octX,durXt54 

SOUND  1,0,0,0,14 
LOOP4 
•ongt4 

DATA  3,2,4,3,1,4,3,1,4,3,2,4,3,2,4,10,2,34 
DATA  3,2,4,7,2,4,7,1,4,7,1,4,7,2,4,7,2,44 
DATA  3,2,4,7,2,4,10,2,4,10,1,4,10,1,4,10,2,4 
4 

DATA  12,2,4,7,2,4,10,2,4,3,4,4,0,0,04 
RETURN4 

PROCEDURE  tapm4 
RESTORE  tapa4 
HAVE  0,04 
D04 

READ  vlX,durX,octX4 

EXIT  IF  vlX-04 

SOUND  l,15,vlX,cx:tX,durXM4 

SOUND  1,0,0,0,14 
LOOP4 
tap»i4 
DATA  8,3,4,8,1,4,1,12,5,8,4,4,1,1,5,5,12,5,1 

DATA  5,1,5,8,8,5,5,4,5,1,4,4,8,12,3,8,3,3,1, 

X2f  4p  Bp  0p  0^ 
RETURN4 
PROCEDURE  Min_routln«4 

VOID  XBI0S(5,LiaX,LibX}4 

DEFTEXT  2,5,0,324 

TEXT  25,50, '■CanBratul«tianB!''4 

DEFTEXT  7,0,0,44 

TEXT  20,70,  "You  h«v>  succMafully  d*f«nd«d  t 

ha  Sol »r   8y«t*« ! *4 

8r«c_>Dr)g4 

Srac_Baog4 
RETURN4  a 


Moving? 

For  address  changes 

or  subscription  information, 

call  toll  free 

1-800-727-6937 
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Readers  Feedback 


1^ 


The  Editors  and  Readers  of  COMPUTE! 


If  you  have  any  questions,  comments,  or 
suggestions  you  would  like  to  see  ad- 
dressed in  this  column,  write  to  "Readers' 
Feedback,"  COMPUTE!,  P.O.  Box  5i06, 
Greensboro,  NC  27403.  Due  to  the  volume 
of  mail  we  receive,  we  regret  that  we 
cannot  provide  personal  answers  to  tech- 
nical questions. 


IBM  Mouse  And  Joystick 

I  have  a  Leading  Edge  computer  with 
two  disk  drives,  640K  of  memory,  a 
modem,  and  an  RGB  monitor.  I  want  to 
buy  a  mouse  and  a  joystick  for  my 
computer,  but  I'm  not  sure  what  this 
involves.  What  are  some  of  the  things  I 
need  to  consider  before  I  buy? 

Marion  C.  Bass 

Nothing  can  enhance  the  PC's  user  inter- 
face more  than  a  mouse,  but  there  are 
certain  things  you  should  know  about 
before  buying  a  mouse  for  your  PC. 

For  a  mouse  to  be  really  useful,  you'll 
need  software  that  fully  supports  it.  Al- 
though there  is  relatively  little  software 
available  now  that  allows  mouse  input, 
more  and  more  is  released  every  day.  And 
since  the  mouse  is  such  a  powerful  com- 
puting aid,  it  won't  be  long  before  most 
software  packages  support  the  device. 

Microsoft  Corporation  took  an  early 
promouse  stand  by  both  manufacturing  a 
mouse  itself  and  supporting  the  mouse  in 
its  software.  Now,  most  Microsoft  PC  prod- 
ucts offer  full  mouse  support  with  other 
manufacturers  follcwing  Microsoft's  lead. 

Another  consideration  depends  on 
your  computer's  hardware.  There  are  two 
types  of  PC  mice:  serial  and  bus.  The 
serial  mouse  simply  connects  to  one  of 
your  computer's  serial  ports — the  same 
type  of  port  your  modem  uses.  The  bus 
mouse  has  a  card  that  goes  in  an  empty 
slot  inside  your  machine,  and  the  mouse 
connects  to  this  card.  If  you've  got  an 
extra  serial  port,  then  the  serial  mouse  is 
the  easiest  to  install.  If  you  don't  have  a 
free  serial  port,  you'll  have  to  use  one  of 
your  empty  slots  for  a  bus  mouse's  card. 

The  last  consideration  is  the  software 
that  comes  with  the  mouse  itself  Mice 
require  a  special  mouse  driver  program 
which  you  either  specify  in  your  CONFIG 
.SYS  file  or  load  as  a  TSR  (Terminate-and- 
Stay-Resident)  program.  (Most  mouse  pack- 
ages will  have  both  kinds  of  drivers.)  First, 


the  driver  should  be  Microsoft  compatible. 
Second,  the  supplied  software  should  allow 
you  to  construct  menus — or  mouse  shells — 
that  allow  you  to  use  the  mouse  with  pro- 
grams that  don't  support  the  mouse  them- 
selves. A  mouse  shell  usually  doesn't  make 
a  program  as  easy  to  use  as  one  that  sup- 
ports the  mouse  internally,  but  it  still  can 
offer  an  improvement  over  a  keyboard- 
driven,  nonmouse  interface. 

Things  are  simpler  with  a  joystick. 
First,  you'll  need  a  joystick  that  is  intend- 
ed especially  for  the  PC.  In  addition, 
you'll  need  a  game  controller.  Game  con- 
trollers usually  come  with  other  options — 
parallel  or  serial  ports — on  a  multifunc- 
tion card  that  goes  in  a  slot  inside  your 
PC.  Your  system  may  already  have  one. 
Check  your  manual. 

Graphics  And  Music  In 
Amiga  Basic 

Is  there  a  relatively  easy  way  to  load 
Deluxe  Paint  U  pictures  into  Amiga 
Basic?  Also,  can  I  load  Musicraft  music 
files  into  my  BASIC  programs? 

M.  J.  Phillips 

You  can  load  Deluxe  Paint  n  files  into 

your  BASIC  programs.  In  fact,  there's  even 
a  program  on  the  Version  1.2  Extras  disk 
that  comes  with  every  Amiga  sold.  The 
program  works  with  just  about  every  video 
mode  available  on  the  Amiga,  with  the 
exception  of  HAM  and  Extra-Half-Brite 
modes  (these  modes  require  six  bitplanes, 
while  Amiga  Basic  allows  only  five.) 

We  know  of  no  way  to  load  Mu^craft 
(now  sold  as  Sonix)  files  or  any  other 
music  files  into  Amiga  Basic.  Even  if  you 
could  load  the  files,  the  limitations  of 
BASIC  sound  would  probably  make  for 
disappointing  music.  There  might  be  a 
way  to  add  music  commands  to  BASIC, 
but  we  haven't  seen  that  done  yet. 

MS-DOS  Emulation 
For  The  64 

Can  a  Commodore  64  emulate  MS- 
DOS?  Speed  is  not  important.  If  it  can 
emulate  MS-DOS,  could  you  suggest 
any  manufacturers  that  might  have 
such  an  emulator? 

Mike  Warick 

Yes,  it's  possible  for  a  64  to  emulate  an 
IBM  PC,  in  the  same  sense  that  it's  possi- 


ble to  bail  out  lake  Michigan  with  a 
teaspoon.  Unfortunately  (or  perhaps  for- 
tunately), both  are  impractical.  We  under- 
stand why  readers  are  so  interested  in 
emulators,  but  when  it  comes  to  emula- 
tors, the  news  is  rarely  good. 

Emulation  is  a  complex  business,  but 
here's  one  rule  of  thumb:  The  only  way  to 
successfully  emulate  a  machine  is  with  a 
much  more  powerful  machine.  An  IBM  PC 
would  be  a  better  candidate  for  emulating  a 
64  than  vice  versa  (even  then,  the  graphics 
and  sound  emulation  would  be  embarrass- 
ing, at  best.)  let's  look  at  two  examples. 

First,  there  are  emulators  that  allow 
Commodore's  Amiga  to  emulate  a  Com- 
modore 64.  The  Amiga  uses  a  32-bit  68000 
microprocessor  running  at  about  7  MHz 
and  has  vast  amounts  of  memory.  When 
the  powerful  Amiga  emulates  the  64's  1 
MHz  6502,  the  results  are  disappointing. 
The  emulation  runs  at  about  one-fourth  a 
64's  normal  speed.  Much  too  slow  for 
games  and  irritatingly  sluggish  for  most 
other  applications. 

Another  emulator  allows  an  MS- 
DOS  8Q86-based  computer  to  emulate 
CP/M  Z80.  This  emulation  results  in  an 
8-MHz  8086  emulating  Z80  running  at 
between  1  and  2  MHz.  This  emulation  is 
fairly  successful  because  the  8086  family 
of  microprocessors  is  somewhat  compatible 
with  the  8080 /Z80  family.  Even  though 
this  emulntion  is  usable  for  some  applica- 
tions, it  is  too  slow  for  many  others. 

Why  are  emulators  so  much  slower?  A 
computer's  microprocessor  is  an  interpret- 
er of  machine  language.  It  fetches  an  in- 
struction, decodes  it,  and  executes  it.  A 
software  emulation  of  this  procedure  must 
follow  the  same  process  of  interpreting 
individual  machine  language  instructions, 
with  the  result  that  the  code  is  interpreted 
twice — once  by  the  software  emulator  and 
once  by  the  host's  microprocessor. 

Microprocessor  emulation  is  a  formi- 
dable fasJt'  but  it  is  only  the  first  problem 
to  face  when  designing  an  emulator.  In 
addition  to  the  microprocessor,  a  com- 
puter system  has  its  awn  special  memory 
organization,  input,  and  output. 

When  considering  I/O,  some  emula- 
tions are  impossible.  The  64's  video  can- 
not emulate  a  Hercules  Graphic  Card  or 
IBM's  EGA  (Enhanced  Graphic  Adapter); 
the  hardware  just  isn't  there.  With  disks, 
the  problem  is  sufficiently  complex  to  be 
considered  impossible.  Imagine  trying  to 
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simulate  a  lO-megabyfe  hard  disk  with 
125  subdirectories  and  600  user  files  on  a 
Commodore  1571  with  15  boxes  of  floppies. 
When  imagining  a  64  or  128  emulat- 
ing a  512K  8086-based  MS-DOS  com- 
puter, a  few  back-of-the-enveiope 
calculations  show  a  speed  degradation  of 
about  1000:1.  This  means  that  a  program 
that  normally  takes  30  seconds  to  load  on 
an  IBM  PC  would  take  over  eight  hours  on 
a  64  emulating  an  MS-DOS  machine.  So, 
although  it  might  be  possible  for  a  64  or 
128  to  emulate  an  MS-DOS  machine,  by 
the  time  the  emulation  software's  been 
developed  and  you've  run  your  first  pro- 
gram, MS-DOS  may  no  longer  be  the 
popular  operating  system  it  is  today. 

Disks  And  DOS 

I  recently  purchased  COMPUTEI's  Best 
of  Atari.  It  comes  with  a  magazine  and 
disk.  However,  neither  side  of  the  disk 
would  boot.  How  can  I  use  this  disk? 

Iva  Reed 

All  COMPUTE!  disks  for  Atari  computers 
are  shipped  without  DOS.  To  use  one  of 
these  disks,  insert  a  DOS  2.0  or  2.5  system 
disk  into  the  drive  before  you  boot  your 
computer.  If  you  boot  up  in  BASIC,  you'll 
see  the  message  READY.  To  see  a  directo- 
ry, go  to  the  DOS  menu  by  typing  DOS, 
then  press  A,  and  then  press  RETURN 
twice;  you'll  see  a  list  of  all  the  programs 
on  the  disk.  Machine  language  programs 
can  usually  be  loaded  by  using  the  L  menu 
option.  Load  BASIC  programs  from  within 
BASIC  itself 

COMPUTE!  quarterly  disks  (but  not 
the  Best  of  Atari  disk)  have  a  menu  pro- 
gram to  make  the  process  a  bit  easier:  fust 
type  RUN"D:MENU"  from  BASIC  for  this 
menu. 


File  Check  And 
Improved  Input 

I  would  like  to  make  my  Applesoft 
BASIC  program  check  to  see  if  a  fOe 
exists  on  a  disk.  I  need  this  for  a  data- 
base program  I  am  writing.  If  I  have  this 
feature,  I  can  keep  people  from  acci- 
dently  deleting  their  work. 

I  also  have  a  question  about  IN- 
PUT. In  your  February  "Reader's  Feed- 
back," you  told  a  Commodore  64  user 
about  two  POKEs  that  put  quotation 
marks  into  the  keyboard  buffer  before 
input  strings.  Can  you  do  this  in  Apple- 
soft BASIC? 

James  B.  Sullivan 

Here's  a  short  example  program  that 
checks  for  an  existing  file.  This  program 
segment  cannot  be  used  as  a  subroutine 
(the  ON  ERR  statement  would  destroy  the 
return  address.)  The  program  keeps  asking 
for  a  filename  until  you  give  one  that 
doesn't  exist. 


M  5  REM  test  for  an  CKlsting  fi 

le 
V   10  INPUT  »  enter  file  name  "; 

F« 
iZ  20  ex  »  0:  DNERR  GOTO  60 
fd  30  PRINT  CHR»  (4)  "verify  "F* 
BE  40  IF  EX  -  0  THEN  PRINT  "file 
exiBtm,  try  again"!  BOTO 

20 
H   50  PRINT  "file  does  not  exist 

*ft  34  SOTO  70 

90  60  EX  -  1:  POKE  216,0:  QOTO  4 

0 
^1   70  REM  put  the  rest  of  your    p 

rogram  here 

The  answer  to  the  second  question  is 
no,  you  cannot  POKE  quotation  marks 
into  the  keyboard  buffer  on  the  Apple. 
One  way  to  allow  commas  and  colons  in 
an  INPUT  string  is  to  use  a  custom  sub- 
routine for  input.  The  program  below  uses 
a  subroutine  at  line  890  for  input.  In 
addition  to  allowing  commands,  the  delete 
key  and  left  cursor  key  are  active,  and  the 
Escape  key  allows  you  to  restart  input. 

Si   100  REM  «ubroutln»  to  allOH 

coammm   and  eolcins  in  inpu 

t 
«f  1L0  PRINT  "test  input  "; 
F2  120  QOSUB  890;  PRINT  "you  ent 

ered  " AM* 
BF  130  END 
B<  890  PRINT  "?"f 
K   900  SET  A«i  IF  A«  "  CHR*  < 13) 

THEN  970 
7D  910  IF  A»  <  >  CHR»  <S)  AND  A* 

<  >  CHR»  <127)  THEN  940 
27  920  IF  LEN  <AM»)  <  2  THEN  AM* 

-  "":  BOTO  940 
HI   930  AM*  »  LEFT*  (AM*,  LEN  (AM 

»>  -  1)1  GOTO  960 
F4  940  IF  A*  -  CHR*  (27)  THEN  FO 

R  I  "  1  TO  LEN  (AM*)!  PRI 

NT  CHR*  (B);i  NEXT  lAM*  - 
'■'■i  SOTO  960 
?C  950  AM*  -  AM*  +  A*«AM*  -  LEFT 

•  (AM*, 38) 
36  960  PRINT  A*;  :  GOTO  900 
e<  970  PRINT  s  RETURN 


Sequential  File  Overwrite 

Is  it  possible  to  write  over  a  sequential 
file  with  another  sequential  file  of  the 
same  name?  I  have  a  64. 

D.  J.  Bumbarger 

You  can  overwrite  a  sequential  file  using 
the  DOS  save-with-replace  command.  For 
this  file  type,  you  would  use  the  format 
OPEN2,8,2,"@x:SEQ  FIIE,S,W",  where  x 
;s  the  drive  number  (usually  0)  and  SEQ 
FILE  is  the  filename  of  the  sequential  file 
you  wish  to  replace. 

However,  because  of  a  bug  in  older 
1541  and  1571  drives  (which  may  destroy 
some  data  on  your  disk),  a  better  approach 
is  to  simply  scratch  the  old  file  before 
saving  the  new  one.  The  short  program 
below  uses  this  technique. 

10  OPEN15,8,15,"S0:SEQ  FILE":C 

L0SE15 
20  OPEN2,8,2,"0:SEQ  FILE,S,W" 
30  PRINT#2,"DATA" 
40  CL0SE2 


Catching  Bits  In  BASIC 

I  own  an  Atari  1040  ST.  I  would  like  to 
know  how  to  accept  data  bits  through 
the  parallel  bus  using  GFA  BASIC  or 
assembly  language.  Are  there  certain 
POKEs  that  I  can  do  for  this? 

Gregory  A.  Macey 

It's  quite  easy  to  do  this  in  GFA  BASIC. 
Here's  a  short  program  that  reads  a  byte 
from  the  keyboard  and  displays  it  on  the 
screen.  Any  other  input  device  can  be  read 
in  the  same  way;  just  change  the  device 
number  as  indicated. 

device— 2 
'  device 
'  device 
'  device 
'  device 
CLS 
DO 

IP  INP7(device)  THEN 
a-INP(device) 
PRINT  CHR$(a); 

ENDIF 
LOOP 


0  Printer  Port 

1  Serial  Port  (RS-232) 

2  Keyboard 

3  Midi 


Saving  The  Screen 

Can  you  provide  me  with  a  program 
that  will  save  the  screen  to  disk  on  the 
Commodore  64? 

Ron  Jentz 

When  saving  a  screen  to  disk,  you'll  want 
to  save  both  text  and  color  memory.  The 
following  BASIC  loader  POKEs  a  machine 
language  program  into  memory  at  loca- 
tion 828.  After  running  the  program,  the 
screen  will  be  saved  anytime  you  press  the 
Commodore  logo  key  andfl  simultaneously. 


RG  10 


CE 

20 

HX 

30 

RR 

40 

DS 

50 

FF 

60 

XQ 

70 

HA 

80 

KR 

90 

XP 

100 

BJ 

110 

KQ 

120 

GS 

130 

CA 

140 

KM 

150 

GB 

160 

FORI=8  28T0988:READA:X=X+ 

A:  POKE  I,  A:  NEXT:  IFX0  2132 

0THENPRINT"DATA  ERROR.": 

STOP 

SYSB2S:END 

DATA  120,169,78,141,23,3 

,169,3,141,21 

DATA  3,169,0,141,219,3,8 

8,96,173,219 

DATA  3,240,3,76,49,234,1 

65,203,201,4 

DATA  208,124,173,141,2,2 

01,2,203,117,141 

DATA  219,3,165,157,141,2 

20,3,169,0,133 

DATA  157,162,1,134,205,1 

66,207,208,252,169 

DATA  1,133,204,173,0,221 

,73,3,133,252 
DATA  173,24,208,41,240, 
102,252,106,102,252 
DATA  106,133,252,169,0, 
133,251,169,1,162 
DATA  8,160,0,32,186,255 
,173,167,2,162 
DATA  168,160,2,32,189,2 
55,162,232,24,165 
DATA  252,105,3,168,169, 
251,32,216,255,162 
DATA  3,134,251,160,216, 
132,252,173,184,2 
DATA  162,185,160,2,32,1 
89,255,169,251,162 
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QS  170  DATA  232,160,219,32,216 
,255,169,0,141,219 

EF  180  DATA  3,173,220,3,133,15 
7,76,49,234,0,0 

Before  you  attempt  to  save  a  screen, 
you  must  choose  filenames  for  the  text  and 
color  memory  files.  The  following  two- 
line  program  will  store  the  filenames  in 
memory  for  you.  Decide  on  the  filenames 
and  substitute  them  for  the  default  names 
given  in  line  10. 

10  T$="TEXT":S=679:GOSUB20:T$= 
"COLOR" : 3=6 96 :GOSUB20: END 

20  L=LEN (TS) :POKE,L:FORI=1TOL! 
POKES+I,ASC{MIDS (TS,I,1) ) :N 
EXT: RETURN 

When  you  have  a  screen  that  you 
want  to  save,  press  Commodore-fl.  If  you 
wish  to  save  another  screen,  use  the  pro- 
gram above  to  change  the  filenames.  Oth- 
erwise, you'll  get  a  disk  error  when  the 
program  attempts  to  overwrite  your  pre- 
viously saved  screen.  ' 

To  load  the  saved  screens,  use  the 
following  program.  Change  lines  20  and 
30  to  specify  the  filenames  you  used  when 
saving  the  screen. 

10    IFA=0THENA=1:POKE53265,PEEK 

(53265) AND239:REM   BLANK    SCR 

EEN 
20    IFA=1THENA=2:L0AD"TEXT" ,8,1 
30    IFA=2THENA=3: LOAD "COLOR", 8, 

1 
40    POKE53265,PEEK(53265)OR16:R 

EM    TURN    ON    SCREEN 
50    GOTO50 
60    REM    CONTINUE    BASIC     PROGRAM 

This  last  program  could  be  to  load  a 
title  screen  for  your  own  programs.  Just 
change  line  50  to  a  delay  loop  and  contin- 
ue your  program  from  there. 


Redefining  The  ST  Keyboard 

I'm  an  Atari  520ST  owner  from  Sweden 
and  I  wish  I  could  print  the  characters  k, 
a,  and  o.  I  wonder  if  there  is  any  way  to 
redefine  three  keys,  for  instance  [,  ],  and 
\ ,  so  when  I  press  one  of  these  keys,  &, 
a,  and  6  will  appear. 

Johan  Melander 

It's  certainly  possible  to  redefine  the  key- 
board map.  Within  the  ST  ROMs  is  an 
XBIOS  function  called  KeytblO,  which 
resets  the  pointers  to  the  translation  ta- 
bles used  to  convert  keyscan  codes  into 
ASCII  character  codes.  To  use  it,  first  set 
up  three  arrays  of  128  characters,  one 
array  each  for  normal  characters.  Shift 
characters,  and  Caps  Lock  characters. 
Next,  call  KeytblO,  passing  the  addresses 
of  the  three  arrays.  The  keys  will  be  rede- 
fined from  thai  point  forward. 

One  small  problem  is  that  when  the 
keyboard  redefinition  program  ends,  the 
conversion  table  is  normally  erased, 
which  locks  up  the  keyboard  or  causes  it  to 
print  strange  characters  when  you  type. 


The  solution  is  the  PiermresO  function, 
which  tells  the  operating  system  that  the 
current  program  is  to  "terminate  but  stay 
resident."  The  program  ends,  but  it's  not 
erased  from  memory, 

The  keyscan  codes  for  the  keys  labeled 
[,  ],and  \  are  91,  93,  and  92  respectively 
The  ST's  character  codes  for  h,  a,  and  6  are 
143,  142,  and  153  for  the  uppercase  ver- 
sions of  these  characters,  and  134, 132,  and 
148  for  the  Icwercase  versions. 

You  can  use  virtually  any  language 
except  ST  BASIC  to  write  the  program 
thai  calls  KeytblO  and  PtermresO.  Here's 
an  example  written  in  C: 

#include  <stdio.h> 
#include  <osbind.h> 

static  char  nk[3][128],- 
struct  table{ 

char  'nonn; 

char  'shift; 

char  'caplock; 
}  'keys; 

mainC ){ 

int  i,j; 

char  •(m(3]>; 
long  mem; 

appLJnit( ); 

keys  =  (struct  table  •>  KeytbH-lL, 

-1L,-1L); 
in[0] "  key  s->norm; 
tnjl]  =  key  s->shift; 
mfZ]  =■  keys->caplock; 
for(i-0;i<3;i++) 

fot(j-0;i<128;  j  +  +) 
nk[il[j]-  '(mlij+j); 
iik[0]{26]  -  134; 
nk[0][27]  =■  132; 
nk[0][43]  =  148; 
nk[l][26]  =  nk[2]t26]  =  143; 
nk[l][27]  =  nk[2][27]  =  142; 
nk[l][43]  -  nk[2J[43]  -  153; 
KeytbUnk[01,  nk[ll,  nk[2]); 
appl_exit( ); 
Ptermre9a2000L,0); 

} 

The  12,000  bytes  reserved  for  the 
program  and  variables  in  the  last  line 
should  be  sufficient.  If  your  version  of  C 
allows  you  to  determine  the  actual  memo- 
ry used,  you  could  calculate  the  size  of  the 
program  and  its  variables  and  substitute 
that  value  in  the  PtermresO  function. 
Once  the  keys  are  redefined,  they'll  stay 
that  way  for  word  processors,  languages, 
games,  and  so  on,  until  you  reset  or  reboot 
your  ST. 


SpeedScrlpt  Utilities 

Does  COMPUTE!  publish  a  disk  with 
nothing  but  SpeedScr;pt-related  pro- 
grams on  it?  There  are  many  of  us  that 
use  SpeedScript  and  would  love  to  have 
such  a  disk. 

John  Reaves 

For  Atari,  Apple,  and  Commodore  users 
there's  a  handy  way  to  get  some  of  the  best 


SpeedScript  utilities  on  one  disk,  along 
with  lots  of  other  great  programs. 

COMPUTD's  Best  of  Apple,  Best  of  COM- 
PUTE! &  GAZETTE  for  Commodore  64  &  US, 
and  COMPUTEI's  Best  of  Apple  each  come 
bundled  with  a  disk  which  includes  the 
latest  version  of  SpeedScript  and  some 
first-rate  SpeedScript  utilities.  These  is- 
sues may  be  available  at  your  local  news- 
stand, a  bookstore,  or  from  a  computer 
dealer. 


In  The  Fast  Lane 

In  the  August  1987  "Reader's  Feedback" 
column,  a  reader  wanted  to  make  a 
Commodore  64  run  faster.  I  sometimes 
want  to  make  my  AT&T  PC-6300  run 
slower.  1  have  several  games  that  were 
vmtten  for  the  standard-speed  IBM  PC 
that  run  too  fast  on  my  computer.  I 
would  like  to  be  able  to  select  a  slower 
speed  for  the  games  and  a  faster  one  for 
other  software.  How  do  I  do  this? 

Irvin  E.  Poston 

The  IBM  PC  uses  an  Intel  8088  micro- 
processor running  at  4.77  MHz.  Your 
AT&T  PC-6300  uses  an  Intel  8086  micro- 
processor running  at  8  MHz.  The  8086  is  a 
true  16-bit  processor,  and  in  your  case  it  is 
running  at  almost  twice  the  speed  of  the 
IBM's,  so  your  games  will  definitely  play 
faster.  Unfortunately,  there's  no  way  to 
switch  your  processor  to  a  slower  speed. 
Some  other  clones  have  a  hardware  or 
software  switch  to  select  the  original  4.77 
MHz  speed,  but  AT&T  intended  their  PC- 
6300  to  be  used  as  a  business  machine, 
and  in  that  environment,  "the  more 
speed,  the  better"  is  usually  the  rule. 


Attention  PC 
ProgrammersS 

COMPUTE!  Publications  is  look- 
ing for  utilities,  games,  applica- 
tions, educational  programs, 
and  tutorial  articles.  If  you've 
written  a  program  that  you 
think  other  readers  might  enjoy 
or  find  useful,  send  it,  with 
disk,  to: 

Submissions  Reviewer 
COMPUTE!  Publications 
P.O.  Box  5406 
Greensboro,  NC  27403 

Please  enclose  an  SASE  if  you 
wish  to  have  the  materials 
returned, 
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Creativity  With  Constraints 


As  someone  who  spends  most  of 
his  professional  life  in  creative  pur- 
suits, I'm  used  to  using  computers 
as  support  tools  in  the  creative  pro- 
cess. Graphic  design  tools,  idea 
processors,  text  layout  programs 
and  music  programs  are  used  in  my 
office  almost  every  day. 

Because  I'm  so  familiar  with 
these  tools  and  their  value  in  sup- 
porting my  creative  process,  I'm  oc- 
casionally puzzled  when  one  of  my 
friends  tells  me  that  he  or  she  feels 
intimidated  by  a  creativity  tool  that 
starts  with  a  blank  screen.  Whether 
the  blank  screen  is  associated  with 
a  word  processor,  graphics  pro- 
gram, or  music  composition  tool, 
many  people  would  rather  have 
tools  that  guide  them  in  their  cre- 
ative process. 

I  remember  that  when  the 
Macintosh  first  came  out,  it  was 
shipped  with  both  a  word  processor 
and  a  graphics  program.  While  al- 
most all  Mac  users  found  the  word 
processor  to  be  easy  to  use,  many 
failed  to  master  the  graphics  pro- 
gram. The  sample  graphics  sup- 
plied by  Apple  were  of  such  high 
quality  that  most  users  had  a  hard 
time  even  coming  close  to  this  level 
of  graphic  quality  so  gave  up  trying. 
Many  Mac  users  were  frustrated  be- 
cause they  wanted  to  incorporate 
graphics  into  their  documents,  but 
felt  they  lacked  the  patience  or 
experience  needed  to  create  their 
own  drawings. 

Within  a  few  months,  a  brisk 
market  in  disk-based  clip  art  rose  to 
meet  the  needs  of  those  of  us  who 
lacked  the  skill  to  draw  in  any  me- 
dium, let  alone  the  computer  screen. 

Clip  Art  Creativity 

The  availablity  of  clip  art  allowed  a 
wide  range  of  creative  expression 
by  anyone  adept  at  using  the  com- 
puter without  requiring  a  high  level 
of  artistic  skill.  Pictures  could  be 
copied  and  pasted  into  place  to  cre- 


ate new  images.  While  the  user  was 
constrained  in  the  breadth  of  avail- 
able pictures  from  which  to  start, 
the  myriad  possible  arrangements 
and  combinations  of  pictures  al- 
lowed a  tremendous  freedom  of 
creative  expression. 

This  ability  to  support  creativ- 
ity in  the  absence  of  highly  refined 
skills  is  a  major  feature  of  comput- 
ers. It  not  only  supports  the  needs 
of  a  large  market,  but  also  encour- 
ages those  who  want  to  develop 
their  skills  to  the  point  where  prod- 
ucts like  clip  art  aren't  needed  so 
much.  It  turns  a  major  step  (from 
zero  skill  to  artiste)  into  a  gentle 
ramp,  providing  some  freedom  of 
expression  while  skills  are  being 
developed  and  refined. 

Music  For  Ttie  Rest  Of  Us 

I  was  reminded  of  this  recently 
when  I  visited  my  local  computer 
store  and  noticed  that  Brederbund's 
product.  Jam  Session,  was  in  the 
hands  of  most  people  standing  by 
the  cash  register.  Jam  Session  is  a 
Mac-based  music  program  that  al- 
lows the  user  to  play  along  with  the 


computer  using  the  keyboard  to 
accompany  background  passages 
played  by  the  computer  itself.  Be- 
cause the  computer  knows  what 
key  it  is  in,  and  where  the  music  is 
going,  the  user's  keys  only  play 
tones  appropriate  for  that  portion  of 
the  music.  People  who  would  love 
to  create  their  own  music  but  who 
lack  proficiency  with  an  instrument 
have  found  that  tools  like  Jam  Ses- 
sion open  the  door  to  their  own 
creative  expression. 

My  first  exposure  to  a  program 
like  this  came  a  few  years  back  with 
Dancin'  Teats  on  the  Atari  800.  I 
have  no  idea  if  the  folks  who  did 
that  product  are  still  in  business, 
but  it  was  one  of  the  most  wonder- 
ful Atari  programs  I've  ever  seen. 
Dancin'  Feats  was  set  up  to  allow 
jamming  in  the  blues,  jazz,  and 
swing  styles  with  user  control  over 
tempo  and  other  stylistic  variables. 
The  performer  played  with  the  joy- 
stick, which  played  notes  from  a 
scale  appropriate  to  the  chord  pro- 
gression of  the  piece. 

About  two  years  ago  at  a  multi- 
media show,  I  had  a  member  of  the 


A  background  scene  for  country  music  jamming  with  Jam  Session. 
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audience  play  with  Dancin'  Feats 
while  I  filled  in  from  a  separate 
synthesizer.  In  the  beginning,  my 
helper  was  timid  and  just  worked 
the  joystick  between  two  or  three 
notes.  Within  a  minute  she  was 
wailing  away  at  the  blues  and  the 
audience  was  clapping  in  rhythm  to 
the  music.  She  could  have  gone  on 
all  afternoon,  but  we  stopped  the 
piece  after  a  few  minutes. 

This  experience  is  not  uncom- 
mon. People  who  are  too  timid  to 
play  music  are  skeptical  when  they 
start  working  with  a  computer  pro- 
gram that  does  the  hard  part  for 
them.  But,  once  started,  the  music 
hiding  in  the  player  starts  to  emerge 
through  the  joystick,  and  the  result 
is  invigorating  for  all  concerned. 

Jam  Session 

Jam  Session  has  the  same  effect  on 
people  as  Dancin'  Feats.  A  "backup 
band"  (shown  in  animation  on  the 
display  screen)  establishes  the  pro- 
gression for  the  jamming  in  almost 
any  style  you  want,  For  example, 
you  can  jam  with  anything  from  a 
walking  bass  or  country  music  to 
Chopin  or  heavy  metal.  Each  style 
of  music  has  its  own  display  screen. 
Once  the  background  music  gets 
started,  most  people  start  playing 
with  a  few  of  the  keys  to  see  what 
they  do.  Since  dissonance  is 
blocked,  all  notes  sound  good. 
After  a  while,  the  user  is  playing 
away  at  complex  passages  that 
sound  exceptionally  good. 

Music  Minus  1 

Because  I  don't  play  with  a  group, 
I've  been  using  Jam  Session  to  work 
on  my  ensemble  skUls.  For  ex- 
ample, I  set  up  a  walking  bass  pro- 
gression from  which  I  can  then  play 
my  own  melodies  on  my  piano. 
This  ability  to  jam  along  with  a 
tireless  backup  group  is  wonderful. 
It  also  shows  that  products  like 
this  can  support  the  user  from  the 
beginning  of  musical  interest  to  the 
development  of  independent  per- 
formance skills  on  traditional  in- 
struments. Again,  the  giant  step  is 
replaced  by  a  gentle  slope. 

But  is  It  Creative? 

Some  purists  might  argue  that  clip 
art  disks  and  music  programs  of  the 
sort  I've  described  are  just  training 
wheels  that  sugar  coat  the  creative 


process  and  act  to  inhibit  the  true 
development  of  the  skills  needed  to 
be  truly  creative. 

My  perspective  is  a  bit  more 
gentle  than  that.  For  one  thing,  I 
don't  think  that  creativity  needs  to 
have  a  rigid  definition.  Inventions 
that  build  on  existing  ideas  can  be 
as  valuable  as  those  that  start  from 
nothing.  For  every  major  idea  like 
the  laser  or  transistor,  there  have 
been  thousands  of  wonderful  in- 
ventions based  on  improvements  in 
existing  technologies.  I'm  a  firm  be- 
liever in  the  idea  that  creative  activ- 
ities should  be  fun. 

Yes,  skills  need  to  be  devel- 
oped, and  that  can  be  a  painful  pro- 
cess. But  traiixing  wheels  can  ease 
the  pain,  keeping  the  creative  spirit 
alive  while  basic  skills  are  developed. 

Dr.  Thornburg  welcomes  letters  from 
readers  and  can  be  reached  at  P.O.  Box 
1317,  Los  Altos,  CA  94023,  © 
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The  World  Inside  the  Computer 


Fred  D'Ignazio.  Contributing  Editor 


The  National  Gallery  Of  Art 
fn  Your  Computer 


Dr.  Gerri  Sinclair,  professor  of  edu- 
cation at  Simon  Fraser  University  in 
Vancouver,  British  Columbia,  is 
one  of  a  large  group  of  pioneers  in 
Apple's  new  HyperCard  environ- 
ment. Dr.  Sinclair  and  her  graduate 
students  work  at  Simon  Eraser's 
EXCITE  (Exemplary  Center  for  In- 
teractive Technologies)  on  three 
Macintosh  computers:  a  Plus,  an 
SE,  and  a  Mac  II.  Their  goal  is  to 
link  the  1,645  color  slides  of  works 
of  art  on  the  National  Gallery  of  Art 
videodisc  with  a  stack  of  HyperCard 
cards  stored  on  Macintoshes. 

Using  Dr.  Sinclair's  stackware, 
an  art  history  student  at  the  univer- 
sity can  call  up  a  particular  work  of 
art  just  by  typing  Find  followed  by 
the  artist's  name,  such  as  Find  Pi- 
casso or  Find  Leonardo.  On  the  Hy- 
perCard card,  there  is  information 
concerning  the  painting,  drawing, 
or  sculpture,  including  the  name  of 
the  artist,  the  name  of  the  work,  the 
date  the  work  was  completed,  the 
medium,  the  period  in  art  history  to 
which  the  work  belongs,  and  so  on. 
Each  card  is  linked  with  a  represen- 
tative slide  on  the  videodisc.  As  you 
browse  through  the  stack  of  cards, 
the  card  itself  appears  on  a  Mac 
screen  and  each  work  of  art  ap- 
pears— in  full  color — on  a  monitor. 

A  Mini-Tour 

The  cards  students  browse  through 
also  have  other  unusual  charac- 
teristics. 

Each  card  in  the  stack  has  a 
number  of  buttons  which  link  it  to 
other  cards  and  other  information. 
For  example,  if  a  student  clicks  on  a 
video  clip  button  on  the  Mac  screen, 
the  student  is  taken  on  a  mini  art- 
history  tour  of  the  National  Gallery 
that  features  the  work  of  art  he  or 
she  is  studying.  According  to  Dr. 
Sinclair,  there  are  25  full-motion 
video  sequences  in  the  stack  ex- 
cerpted from  a  27-minute  Tour  of 
the  National  Gallery  which  appears 


at  the  end  of  the  videodisc. 

After  taking  a  brief  tour  of  the 
gallery,  if  a  student  presses  the  In- 
teractive Comment  button,  a  note- 
pad appears  on  the  screen.  The 
student's  remarks,  once  entered, 
become  annotations  to  the  infor- 
mation linked  to  the  particular 
work  of  art.  Also,  if  the  student 
feels  inspired  by  the  work  of  art,  he 
or  she  may  press  the  sketchpad  but- 
ton to  call  up  a  sketchpad  for  draw- 
ing. Or  the  student  may  enter 
keywords  which  will  link  the  work 
of  art  to  other  works  in  a  report  he 
or  she  is  compiling.  To  retrieve  the 
National  Gallery's  collection  of 
Cubist  works,  for  example,  a  stu- 
dent would  type  Find  Cubism.  All 
the  cards  representing  Cubist 
works  would  flash  on  one  screen, 
and  the  works  themselves  would 
flash  on  another.  At  the  same  time, 
an  instant  report  (listing  all  cards) 
would  be  compiled  by  HyperCard. 
Last,  the  student  could  press  the 
biography  button  to  automatically 
retrieve  the  biography  of  the  artist 
whose  work  is  onscreen.  (The 
search  would  be  conducted  through 
Grolier's  Online  Encyclopedia.) 

Toward  A  Multimedia 
Database 

Dr.  Sinclair  and  her  assistants  have 
put  in  about  200  of  the  National 
Gallery  slides  into  the  HyperCard 
stack  and  have  created  a  significant 
template  for  a  multimedia  data- 
base. She  is  excited  about  turning 
the  template  over  to  students  and 
art  history  professors.  "I  am  con- 
vinced that  putting  together  a  data- 
base is  one  of  the  most  important 
activities  we  should  offer  students 
in  a  classroom  today,"  she  says. 
"Through  the  act  of  compiling  a 
database,  one  not  only  learns  re- 
search skills  and  collects  a  great 
deal  of  information  on  a  given  field 
of  study,  but,  perhaps  more  impor- 
tantly, one  learns  how  to  manage 


information." 

The  Grolier  Encyclopedia  is  cur- 
rently maintained  online  at  Simon 
Fraser  University,  but  this  makes 
looking  up  information  in  the  ency- 
clopedia relatively  slow  compared 
to  the  quick  access  to  the  cards  on 
the  Mac  hard  drive  and  the  video 
images  on  the  videodisc  drives.  In 
the  future.  Dr.  Sinclair  hopes  the 
encyclopedia  will  come  on  a  com- 
pact disc  in  a  Hitachi  or  Apple  CD- 
ROM  drive  connected  to  her 
multimedia  database.  Dr.  Sinclair 
says:  "There  is  a  public  domain 
stack  I  am  using  that  enables  you  to 
make  any  word  in  a  piece  of  text 
'hot'  or  'linkable'  to  any  place  in  a 
stack  or  any  other  stack.  With  the 
CD-ROM  in  place,  when  you  hit 
the  biography  button  on  the  Picasso 
card,  you  will  be  taken  to  the  ency- 
clopedia articles  on  Picasso  on  the 
CD-ROM.  And  if  you  find  more 
topics  you'd  like  to  pursue  while 
reading  the  Picasso  article  (let's  say 
you  want  to  find  out  more  about  the 
Spanish  Civil  War  after  reading 
about  Picasso's  "Guernica"),  then 
you  just  click  on  a  particular  word 
or  phrase  and  you  will  go  directly  to 
another  article  on  the  CD-ROM 
which  contains  the  information  you 
are  interested  in." 

Dr.  Sinclair  feels  that  her  Hyper- 
Card environment  will  transform 
the  way  students  research  a  topic  or 
look  up  information.  HyperCard  has 
the  ability  to  build  an  audit  trail  that 
keeps  track  of  where  you  have  gone 
in  the  associative  web  of  infor- 
mation in  which  you  are  browsing. 
That  way  students  never  get  lost  or 
off-track.  In  fact,  getting  off-track 
becomes  an  integral  part  of  the 
learning  process. 

For  more  information,  contact: 
Dr.  Gerri  Sinclair,  Faculty  of  Educa- 
tion, Simon  Fraser  University, 
Burnaby,  B.C.  V5A  1S6,  Canada.    ® 
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Microscope 


Sheldon  Leemon 


The  Hazards  Of  HyperCard 


Macintosh  owners  have  always 
been  unusually  devoted  to  their 
computers,  but  lately  they've  be- 
come little  more  than  zombies 
glued  in  front  of  those  platinum 
plastic  cases.  The  reason  is  a  pro- 
gram called  HyperCard,  which  now 
comes  bundled  with  the  Macintosh 
system.  There  are  a  number  of  rea- 
sons that  HyperCard  is  having  such 
a  big  impact.  First,  the  program  is 
the  brainchild  of  Bill  Atkinson,  a 
mythic  figure  in  the  Mac  communi- 
ty. Actually,  Bill  ranks  somewhat 
higher  than  a  mythic  figure.  After 
all,  Prometheus  just  brought  fire  to 
mankind,  but  Bill  has  produced 
both  MacPaint  AND  HyperCard. 
Secondly,  HyperCard  is  the  soft- 
ware incarnation  of  a  new  com- 
puter buzzword,  hypertext. 

In  the  fast-changing  world  of 
the  computer  industry,  there's  con- 
stant speculation  on  what's  going  to 
happen  in  the  future  (like  six 
monthf  from  now).  Buzzwords  like 
desktop  video  and  hypertext  serve  as 
mantras  for  the  meditations  of  in- 
dustry prognosticators.  Develop- 
ments such  as  HyperCard  give 
industry  analysis  the  chance  to 
make  predictions  like  "The  next 
significant  program  for  the  Mac  will 
be  a  HyperCard  application." 

I  agree  with  that  prediction, 
but  not  because  I'm  convinced  that 
HyperCard  is  functionally  better 
than  all  other  methods  of  comput- 
ing. The  reason  I  think  that  most  of 
the  significant  new  Mac  software 
will  be  HyperCard-hased  is  because 
Mac  users  won't  be  able  to  tear 
themselves  away  from  it  long 
enough  to  create  anything  else. 
Many  people  have  described  Hyper- 
Card as  being  extremely  interactive. 
Where  a  normal  manual  might  tell 
you  "push  that  button  and  this  hap- 
pens," with  the  HyperCard  manual, 
you  actually  push  that  button,  and 
the  results  happen  instantly,  before 
your  eyes.  In  a  society  so  geared  to 


instant  gratification,  characterizing 
this  as  "interactive"  may  be  putting 
it  a  bit  mildly.  HyperCard  is  interac- 
tive the  way  that  potato  chips  or 
pistachios  are  interactive.  You  may 
be  in  charge  when  you  eat  the  first 
one,  but  by  about  the  fifth  or  sixth 
one,  that  old  hand  is  moving  into 
the  bag  all  by  itself. 

Leftover  Whale  Blubber 

Another  feature  of  HyperCard  that's 
widely  touted  is  the  way  in  which  it 
allows  the  user  to  access  infor- 
mation in  any  order  in  which  he 
chooses,  not  according  to  how 
some  author  has  arranged  it.  You 
might  be  reading  an  article  on  Eski- 
mo life,  click  on  the  section  about 
diet,  and  find  yourself  reading  a 
cookbook  entry  entitled  "Twelve 
New  Ways  to  Use  Leftover  Whale 
Blubber."  While  it's  nice  to  be  able 
to  pursue  side  trails,  novices  may 
soon  lose  the  main  path  entirely.  I 
mean,  can  you  imagine  what  a  hy- 
pertext magazine  might  be  like? 
One  article  and  a  hundred-fifty- 
three  sidebars! 

And  do  we  really  want  to  give 
hypertext  to  young  school  children, 
who  already  have  plenty  of  distrac- 
tions? After  all,  if  a  child  is  studying 
a  lesson  in  ancient  history,  we  real- 
ly don't  want  him  to  click  on  the 
section  where  the  Chinese  invent 
gunpowder  and  end  up  in  a  chemis- 
try lesson  on  how  to  create  fire- 
works in  the  basement.  Such  a 
student  might  be  better  served  by  a 
HypoCard  application,  one  in  which 
every  distraction  which  he  chooses 
to  avoid  studying  leads  him  right 
back  to  the  subject  he'll  be  tested  on. 

The  Harder  Stuff 

While  interacting  with  your  com- 
puter may  not  be  bad  for  you  in  and 
of  itself,  it  can  lead  to  the  harder 
stuff — like  interacting  with  your 
TV.  We've  already  seen  a  primitive 
form  of  this,  first  with  simple  VCR 


games,  and  now  with  the  new  Cap- 
tain Power  series  of  toys,  tapes,  and 
TV  shows.  Captain  Power  uses  in- 
teractive computer  technology  to 
allow  children  to  shoot  at  charac- 
ters on  TV,  and  vice  versa,  with  a 
toy  gun  registering  hits  on  both 
sides.  While  I'm  usually  in  favor  of 
all  new  computer  technology,  Mat- 
tel has  finally  found  a  way  to  ex- 
ceed even  my  limits  of  tolerance. 
The  "P  word"  is  a  definite  no-no  at 
my  house. 

And  things  could  get  even 
worse.  What  if  these  crude  begin- 
nings lead  to  full-fledged  Hyper- 
Tube?  Imagine  you're  watching 
Gilligan's  Island  reruns,  and  you  de- 
cide you  want  to  know  more  about 
the  Professor.  You  move  the  mouse 
pointer  to  his  image,  click  the  but- 
ton, and  instantly,  you're  watching 
a  spin-off  series  in  which  he  plays 
the  lead  role.  Or  maybe  clicking  on 
his  picture  gives  you  a  comparative 
history  of  similar  roles,  like  Fred 
MacMurray  as  the  Absent-Minded 
Professor,  or  Jerry  Lewis  as  the 
Nutty  Professor.  Imagine,  if  you 
will,  the  havoc  that  might  be 
wrought  by  interactive  soap  operas. 
Some  viewers  might  never  be  heard 
from  again.  The  Couch  Potato 
would  transform  into  a  HyperTuber. 

Who  knows  where  all  of  this 
might  lead?  So  far,  HyperCard  has 
been  a  rich  man's  toy,  available 
only  to  Mac  owners  who  can  afford 
lots  of  memory  and  possibly  a  hard 
disk.  But  if  this  trend  continues,  we 
may  soon  see  things  like  interactive 
household  appliances.  Imagine  a 
toaster  that  selects  bread  darkness 
based  on  your  mood  or  how  well 
you  slept  the  night  before.  We 
should  all  remember  that  HyperCard 
and  hypertext  both  start  vrith  the 
word  hype.  And  when  it  comes  to 
hype,  my  advice  is  "just  say  no."© 
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ST  Outlook 


Philip  I.  Nelson 


Printing  ST  Pictures  On  A  Laser  Printer 


With  the  current  explosion  of  inter- 
est in  desktop  publishing,  more  and 
more  laser  printers  are  appearing  in 
offices  and  even  a  few  homes.  Unlike 
a  dot-matrix  printer,  which  forms 
images  by  hitting  an  inked  ribbon 
with  wire  pins,  a  laser  printer  uses 
the  same  graphics  engine  as  a  pho- 
tocopier, offering  vastly  improved 
print  quality.  Laser  printers  are  so 
good,  in  fact,  that  many  professional 
publishers  use  them  in  place  of  con- 
ventional, and  much  more  expen- 
sive, phototypesetting  equipment. 

This  month's  program  shows 
how  you  can  combine  the  ST's  su- 
perb graphics  capabilities  with  the 
high  resolution  of  a  laser  printer.  It 
works  with  the  Apple  LaserWriter, 
one  of  the  most  popular  laser  print- 
ers, and  it  lets  you  make  a  full-page 
printout  of  any  monochrome  DE- 
GAS picture.  Although  it's  written 
in  GFA  BASIC,  the  program  is  so 
simple  that  you  shouldn't  have 
much  difficulty  converting  it  to  the 
language  of  your  choice. 

When  you  run  the  program,  it 
asks  for  the  name  of  the  file  you 
wish  to  convert.  This  must  be  a 
DEGAS-format  monochrome  (.PI3) 
picture  file.  Then  the  program  cre- 
ates a  PostScript  output  file  named 
POSTSCPT.OUT  (PostScript  is  de- 
scribed below).  The  output  file  is 
hefty — over  96,000  bytes — so  be 
sure  that  your  disk  has  enough 
room  before  you  begin,  and  be  pre- 
pared to  wait  a  few  minutes  if 
you're  writing  to  a  floppy  disk. 
After  POSTSCPT.OUT  is  created, 
you  can  rename  it  with  any  valid 
GEMDOS  name. 

The  Laser  Connection 

To  print  the  PostScript  file,  you 
need  to  send  it  to  the  laser  printer. 
Communicating  with  a  LaserWriter 
is  straightforward,  since  it's  a  serial 
device,  just  like  a  modem.  And  the 
PostScript  file  is  plain  ASCII  text,  so 
you  can  send  it  to  the  printer  with 


any  telecommunications  program 
that  has  upload  capability. 

Few  people  have  a  laser  printer 
at  home,  but  there  are  small-scale 
publishers  popping  out  of  the  bushes 
all  over  the  Western  world,  many  of 
whom  will  print  anything  you  like 
on  a  per-page  basis.  You  supply  the 
PostScript  file  and  a  small  fee,  and 
they  provide  the  printout.  Or,  you 
might  be  lucky  enough  to  know 
someone  with  a  laser  printer  who 
doesn't  mind  making  an  occasional 
printout  for  a  friend. 

If  you  can't  transmit  the  Post- 
Script output  file  directly  to  a  print- 
er, you  may  need  to  copy  the  file  to 
a  non-ST  disk.  Most  Apple  Laser- 
Writers are  connected  to  Apple 
Macintosh  or  IBM  PC/compatible 
computers.  In  the  latter  case,  you 
might  be  able  to  take  advantage  of 
the  fact  that  an  ST  disk  drive  can 
read  and  write  to  3V2-inch  disks 
that  are  formatted  on  a  PC-compat- 
ible system.  Another  option  is  to 
use  one  of  the  new  PC-compatible 
5 'A -inch  drives  that  plugs  directly 
into  the  ST. 

Landscape  Or 
Portrait  Mode 

As  listed,  the  program  prints  the 
picture  in  landscape  mode,  or  side- 
ways on  the  paper,  occupying  all 
but  a  thin  margin  on  all  four  sides. 
If  you  change  0  to  1  in  the  first 
nonremark  line,  the  program  prints 
in  portrait,  or  normal,  mode,  plac- 
ing the  image  upright  and  centered 
on  the  page.  Landscape  mode  gives 
you  a  much  larger  printout,  al- 
though it  slightly  alters  the  pic- 
ture's proportions  to  fit  it  neatly  on 
the  page.  (The  ST's  screen  propor- 
tions don't  quite  match  those  of  an 
81/2  X  11  paper.) 

Speal(ing  tn  PostScript 

The  program  takes  advantage  of 
the  fact  that  the  LaserWriter  speaks 
PostScript,  a  language  built  for  page 


description,  which  is  a  fancy  term 
for  the  business  of  putting  words 
and  images  on  paper.  PostScript  has 
much  in  common  with  other  com- 
puter languages:  It  allows  you  to 
create  loops,  execute  subproce- 
dures,  perform  math,  manipulate 
data  structures  like  strings  and  ar- 
rays, and  so  on.  But  while  most 
computer  languages  are  general- 
purpose  in  nature,  PostScript  has  a 
single,  albeit  complex,  purpose: 
telling  a  high-resolution  output  de- 
vice how  to  print  a  document. 
Thus,  it  has  a  wealth  of  special 
graphics-  and  typography-related 
functions  in  addition  to  the  generic 
features  that  every  language  needs. 
PostScript  is  a  stack-oriented 
language  similar  to  Forth  or  the  lan- 
guages used  by  some  high-powered 
scientific  calculators.  If  you're  not 
familiar  with  Forth,  the  simplest 
way  to  describe  its  syntax  is  "back- 
ward." To  explain,  compare  the 
BASIC  statement  PRINT  2  +  2 
with  the  English  statement  "Put  the 
hat  on  your  head."  In  both  cases 
the  verb  (or  keyword,  in  BASIC)  is 
followed  by  the  objects  (arguments) 
that  it  acts  upon. 

Baclcward  Is  Faster 

PostScript,  like  Forth,  reverses  the 
familiar  verb-object  order  of  English. 
First  come  the  objects,  followed  by 
the  PostScript  operator,  or  keyword, 
that  tells  what  to  do  with  them. 
Instead  of  "add  2  plus  2"  (English) 
or  PRINT  2  +  2  (BASIC),  you  have 
"2  2  add"  (PostScript).  In  each  case 
the  result  is  4,  although  the  last 
form  may  take  some  getting  used  to. 
The  reward  for  tolerating  this 
peculiar  syntax  is  speed.  Stack- 
oriented  languages  are  easy  for  a 
computer  to  interpret,  and  hence 
they're  very  fast.  Speed  is  essential 
for  a  printer,  which  most  of  us  treat 
as  a  magical  black  box  rather  than  a 
computer-based  device  that  has  to 
read  and  interpret  a  program  just  to 
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print  a  document. 

The  PostScript  Program 

Although  the  output  file  is  large,  the  PostScript  pro- 
gram itself  is  very  brief.  Here's  a  view  of  the  entire 
program: 

/Bitmap 

< . . .  >  def 

20  600  translate 

640  400  scale 

640  400  1  [640  0  0  -400  0  0]  {Bitmap}  image 

showpage 

The  first  two  program  lines  define  a  string  named 
Bitmap.  In  place  of  the  three  dots,  the  real  program 
would  contain  32,000  hexadecimal  numbers  that  rep- 
resent the  32,000  picture  bytes  in  a  DEGAS  file.  This 
immense  string  gives  the  program  the  raw  data  that  it 
needs  to  recreate  the  picture. 

The  third  line  tells  the  printer  to  move  to  position 
(20,  600)  before  forming  an  image,  while  the  fourth 
tells  it  to  scale  the  image  up,  using  the  same  640  X  400 
proportions  as  the  original  ST  screen. 

The  fifth  program  line  actually  creates  the  image. 
The  first  three  numbers  indicate  that  our  image  is  a  640 
X  400  bitmap  in  which  each  bit  represents  one  dot.  The 
array  in  square  brackets  makes  up  a  transform  matrix 
that  maps  our  image  into  the  PostScript  coordinate 
system.  Inside  the  curly  braces  is  the  name  of  the  string 
that  holds  our  bitmap  data.  The  line  ends  with  the  image 
operator  that  acts  upon  all  the  preceding  information. 

The  last  line  of  the  program  consists  of  a  showpage 
operator,  which  makes  the  printer  print  the  page  that 
the  preceding  statements  describe.  This  version  of  the 
program  prints  in  portrait  mode.  To  switch  to  land- 
scape mode,  we  start  printing  at  the  normal  origin 
(position  (0,  0),  the  lower-left  comer  of  the  upright 
page)  and  then  rotate  the  image  90  degrees  and  scale  it 
to  fill  most  of  the  page. 

If  this  example  whets  your  interest  in  PostScript, 
try  to  get  your  hands  on  the  PostScript  Language  Tutorial 
and  Cookbook,  vmtten  by  Adobe  Systems  (the  inventors 
of  PostScript)  and  published  by  Addison-Wesley.  It's 
chock-full  of  examples  and  does  a  good  job  of  teaching  a 
computer  language  at  the  elementary  level  vrithout 
condescension.  If  you  get  serious  about  PostScript,  the 
same  publisher  offers  The  PostScript  Language  Reference 
Manual,  a  comprehensive  reference  to  the  language. 

PostScript  Printer 

For  instructions  on  entering  this  program,  pleose  refer  to  "COMPUTEI's 
Guide  to  Typing  in  Programs"  elsewliere  In  this  Issue. 

'  POSTPRNT.BflS* 

'    Convart  0EQA8  itonochroaMi    (.f>13)    plctura  flXa 

•    PostScript   foriMt  for   output  to  a   lamar  prin 
tar. 4 

'    Ta  •Hltctt  from   landacap*    (•icSmtay*)    printing 
nods4 
'    to   portrait    (upright)    oodv,    changa  ttia   0  to 
1« 

'    In  th«  naxt   lina.« 
prtmotim^tK^ 
•« 

INPUT    "Entar   0E6AS   iKinoctiraMt    (.PI3>    filanaiM 
I    "if ilanamat^- 

IF  LEN(fll«nai»a«>-0  OR  (RIBHT«(f ilanaiia«,4)<>" 
.PI3"  AND  RlBHT*(fllan«»a*,4><>".pi3")  THEN* 


PniHT   "Invalid  f liana**  (not  .PIS  'file>."« 

END4 
ENDtF^ 
CLOSED 

OPEN  -I",#i,-fllana«a»« 
PRINT  -Raading  "i* llanaaa** 
'  Diacard  DEGAS  -fila  haadar.^ 
junk«-INPUT«  <34, #1 >  * 

'  Raad  DEOAS  plctura  data  froat  disk. 4 
pi  ctura«-INPUT*<32<MM,  ttl  >  <- 
CLOSED 

PRINT  "Raady  to  writa  PoatBcript  *ila."« 
PRINT  "Prama  any  kay  i*h»n  raady.,."* 
WHILE  INKEY«-""« 
WEND4 
'* 

'  l#-ita  PoatBcript  flla  to  diak.« 
OPEN  -0",#2,"a«\P08TSCPT.QUT"« 
PRINT* 

PRINT  "Craating  Poatacript  ■fila..."« 
PRINT  #2,  "/Bitiiiap"|CHR»<13)iCHR»(10)  !"<"!* 
FOR  hytacount-1  TO  320014 

tanp-ASC (MID* (plctura*, bytacount, 1 ) +CHR* (0>  > 

4 

tampt-HEX* (235-taap) +CHR« (32>  4 

IF  LEN(taiKp«)<3  THEN4 
ta«p*-"0-+taiip»4 

ENDIF4 

PRINT  «2,tai«p«|4 
NEXT  bytacount* 
PRINT  #2, ">  daf"4 
'4 

'  Dafault  la  landacapa  aoda.4 
IF  prt»oda-l  THEN4 

RESTORE  portrait* 
ENDIF4 


FOR  J-1  TO  24 

READ  >t«4 

PRINT  »2,i(«4 
NEXT  J4 
'4 

RESTORE  both4 
FOR  J-l  TO  24 

READ  x«4 

PRINT  »2,»«4 
NEXT  j4 
CL08E4 
'4 

CL84 

PRINT  "Convaraioo  ♦lniahad!"4 

PRINT  'PoatBcript  fila  ia  na»ad  P08TSCPT.I3UT'4 
•4 

landacapai4 
DATA  "90  rDtata"4 
DATA  "B80  600  acala"* 
'4 

portrait  1 4 

DATA   "20  600  tranalata''4 
DATA   "640  400   Bcala"4 
'4 

bottii4 

DATA    "640  400    I    C640  0  0   -400  0   03    {Sitiaap}    ia 
aga-4 
DATA  "ahDMpaga"4  Q 


To  receive  additional  information 

on  the  advertisers  in  this  issue, 

use  the  Reader  Service  Card 

in  the  back  of  the  magazine. 
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AmigaView 


Sheldon  Leemon 


Another  Month,  Another  Show 


It  seems  like  no  sooner  do  I  get 
home  from  one  show  than  I'm  back 
on  the  road  for  another.  This  time  it 
was  the  second  AmiExpo,  which 
was  held  in  January  in  Los  Angeles. 
Despite  miserable  weather  and  a 
couple  of  competing  shows,  the 
turnout  was  large  and  the  crowds 
enthusiastic.  Though  this  show  was 
held  only  a  few  weeks  after  the 
World  of  Commodore  in  Toronto, 
which  itself  was  only  a  few  weeks 
after  Comdex,  there  was  still  a  lot  to 
see  that  was  new  and  exciting. 

It  was  interesting,  for  example, 
that  a  number  of  software  houses 
specializing  in  Atari  ST  software 
are  branching  into  the  Amiga  mar- 
ket as  well.  AmiExpo  saw  the  debut 
of  the  Amiga  versions  of  Soft  Logik's 
Publishing  Partner  and  Dr.  T's  mu- 
sic software.  Abacus  was  also  at  the 
show  with  new  books  and  pro- 
grams for  the  Amiga,  including 
DataTrieve,  TextPro,  and  AssemPro. 

Amiga  Painting 

As  usual,  graphics  programs  gener- 
ated much  of  the  excitement.  Mi- 
crolllusions'  Photon  Paint,  a 
powerful  4096-color  paint  pro- 
gram, is  almost  ready  to  ship,  but 
already  it  has  some  strong  competi- 
tion. NewTek  announced  that  it 
will  soon  release  Digi-Paint  II, 
which  has  such  new  features  as  full 
overscan  support,  superbitmap  pic- 
tures that  are  larger  than  the  screen 
size,  rubber  sheeting  for  stretching 
brushes  and  wrapping  them  around 
objects,  improved  HAM  pictures 
and  text  fonts,  and  dithering  for 
more  apparent  colors.  Unlike  the 
first  version,  it  operates  in  any 
mode.  It  even  allows  you  to  digitize 
pictures  from  within  the  program. 
As  if  these  weren't  enough. 
Digital  Creation's  D'Buddy  program 
has  been  picked  up  by  Electronic 
Arts.  It  will  be  released  as  Deluxe 
Photo  Lab.  With  this  program,  you 
can  create  and  edit  pictures  of  up  to 


1,000  X  1,000  pixels  in  any  draw- 
ing mode,  including  HAM  and  Ex- 
tra Half-Brite  mode.  It  will  even 
allow  you  to  create  multiple  screens 
at  the  same  time,  each  with  a  differ- 
ent resolution,  I've  also  heard  that 
Jim  Kent  of  Dancing  Flame  was 
working  on  Zoe trope,  which  allows 
you  to  edit  several  animation 
frames  simultaneously. 

VIdeoware 

There  was  plenty  of  new  video 
hardware  on  hand.  There  were  two 
new  Genlock  interfaces,  the  long- 
awaited  SuperGen  from  Digital 
Creations  and  Progressive  Peri- 
pherals' ProGen,  both  of  which 
allow  you  to  transfer  full-screen 
Amiga  graphics  cleanly  to  video  or 
to  overlay' those  graphics  over  a  live 
video  image.  Progressive  Peripher- 
als was  also  showing  its  Frame 
Grabber,  a  $500  fast  color  digitizer 
that  produces  remarkable  results. 
NewTek  had  a  prototype  Video 
Toaster,  a  board  that  allows  you  to 
turn  your  2000  into  a  sophisticated 
special-effects  generator. 

Lots  of  new  video  software  to 
go  with  the  hardware  was  also 
there.  InnoVision  Technology  was 
showing  Video  Effects  3D,  a  3-D 
titling  and  logo  animation  program. 
This  program  not  only  provides 
standard  2-D  transitions  between 
screens,  including  fades,  wipes,  and 
dissolves,  but  also  offers  a  new 
class  of  effects  such  as  compress, 
zoom,  tumble,  turn,  and  spin — all 
with  true  3-D  perspective.  Other 
effects  include  moving  shadow  cast 
and  3-D  solid  logo  extrusion  from 
flat  text.  NewTek  announced  that 
its  video  production  package,  Digi- 
FX,  would  also  include  many  of  the 
same  3-D  effects. 

Meanwhile,  in  the  area  of  3-D 
animation.  Byte  by  Byte  was  show- 
ing Animate  3D,  the  add-on  that 
turns  Sculpt  3D  into  a  full-fledged 
professional  3-D  animation  studio. 


Those  who  have  seen  the  3-D  ani- 
mations created  with  this  program 
know  that  they  rival  the  graphics 
created  with  half-million-dollar 
systems.  Meanwhile,  at  the  Aegis 
booth,  Allan  Hastings  was  showing 
Videoscape  3D  2.0,  which  adds 
HAM  ray-tracing,  transparent  ob- 
jects, and  more. 

The  Brains  Of  The  Machine 

Not  all  the  news  at  the  show  was 
related  to  new  products,  however. 
For  example,  Richard  Mclntyre, 
Commodore's  VP  of  Marketing  and 
Sales,  stated  that  we'd  probably  see 
not  one,  but  two  Workbench  revi- 
sions this  year. 

Workbench  1 .3  (which  is  near- 
ly completed)  adds  enhanced  print- 
er support,  making  it  easier  for 
developers  of  desktop  publishing 
programs  to  provide  fast  and  accu- 
rate output.  A  Fast  File  System  has 
been  added  to  speed  up  hard  disk 
access  times.  Provisions  have  been 
made  to  interface  the  68881  floating- 
point coprocessor  as  a  peripheral 
device.  This  means  that  the  '881 
chip  on  boards  wUl  automatically 
be  recognized  by  the  system  at 
start-up  time,  and  it  makes  it  more 
likely  that  softvrare  manufacturers 
will  support  the  floating-point  chip. 
Finally,  the  version  1.3  Workbench 
program  is  said  to  be  capable  of 
doing  things  that  previously  re- 
quired CLI. 

The  version  1.3  Kickstart  adds 
provisions  for  booting  Workbench 
from  a  hard  disk  or  network,  Amiga 
owners  who  have  Kickstart  in  ROM 
will  only  need  new  chips  if  they 
want  to  boot  from  hard  disk. 

Some  members  of  the  original 
Amiga  team  have  been  brought 
back  for  version  1,4,  It  will  support 
overscan  and  allow  both  higher  res- 
olution monitors  and  graphics  net- 
working. And  they  may  throw  in  a 
few  surprises,  too.  O 
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Thain  for  Fastest  Growing  Job  Skill  in  America 


Only  NW  teaches  you  to  service  all 
as  you  bufld  your  own  fully  IBM^ 
compatible  microcomputer 


uters 


With  more  and  more  new  applications 
being  developed  for  every  facet  of 
business,  education,  and  personal 
con^utQ-  use,  the  demand  for  trained 
computer  service  technicians  surges 
forward.  The  Department  of  Lalwr 
ranks  computer  service  high  on  its  list 
of  top  growth  fields,  with  accelerated 
demand  creating  more  than  30,000  new 
jobs  within  the  next  10  years. 

Total  systems  training 

No  a)mputer  stands  alone . . . 
it's  part  of  a  total  system.  And 
if  you  want  to  learn  to  service  and 
repair  computers,  you  have  to  under- 
stand computer  systems.  Only  NRI 
inchides  a  powerM  computer  system 
as  part  of  your  training,  caitered 
around  the  new,  fully  IBM-compatible 
Sanyo  880  Series  computer. 

You'll  assemble  the  Sanyo's  "intel- 
ligent" keyboard,  install  the  power  sup- 
ply and  5  V4 "  floppy  disk  drive,  and  inter- 
face the  high-resobtion  monitor.  Phis 
now  you  also  install  a  powerful  20  mega- 
byte hard  disk  drive— today's  most- 
wanted  peripheral— to  dramatically  in- 
crease your  computer's  data  storage 
capacity  while  at  the  same  time  giving 
you  lightning-quick  data  access.  You 
get  more  conBdence-building,  real- 
world  experience  as  you  go  on  to 
master  programming,  circuit  design, 
and  per^hwal  maintenance. 

No  expeiience  necessary— 
NRIbuUdsitin 

Even  if  you've  never  had  any  previous 
training  in  electronics,  you  can  succeed 
with  NRI  training.  Youl  start  with 
the  basics,  then  rapidly  build  on  them 
to  master  such  concepts  as  digital 
logic,  microprocessor  design,  and 
computer  memory.  You'll  build  and  test 
advanced  electronic  circuits  using  the 
exclusive  NRI  Discovery  Lab®, 

Kofessional  digital  multimeter,  and 
_  ^c  probe.  Lake  your  computer, 
they're  all  yours  to  keep  as  part  of 
your  training.  You  even  get  some 


of  the  most  popular 
software,  induding 
WordStar,  CalcStar, 
GW  Basic  and  MS- 
DOS. 

Send  for  100-page 
free  catalog 

Send  the  post-paid 
reply  card  today  for 
NRI's  100-pagE,  full-color  catalog, 
with  all  the  facts  about  at-home 
conqiuter  training.  Read  detailed 
descriptions  of  each  lesson,  each 
experiment  you  perform.  See  each 
piece  of  handsK)n  equipment  youll 
work  with  and  keep,  And  check 
out  NRI  training  in  other  high-tech 
fields  such  as  Robotics,  Data  Com- 
munications, TV/AudioA^ideo 
Servicing,  and  more. 

If  the  card  has  been  used,  write  to 
NRI  Schools,  3939  Wisconsin  Ave., 
N.W.,  Washington,  D.C.  20016 


NRI  Is  the  only  technical 
school  thai  trains  you  as 
you  assemble  a  top-brand 
microcomputer.  After 
buildlns  your  own  logic 
probe,  you'll  assemble  the 
"Intelligent"  keyboard. . . 


...ttran  install 
the  power  sup- 
ply, checking  ail 
connections 
with  your  digital 
multimeter. 
From  there,  you 
go  on  to  install 
the  (loppy  disk 
drive,  monitor, 
and  new  20 
megabyte  hard 
disk  drive. 


SCHOOLS 


McGraw-Hill  Continuing  Education  Center 
3939  Wisconsin  Avenue,  NW    _ , .  _ 
Washington,  DC  20016  S^iW 

We'll  Give  You  Ibmorrow.         ' ' " ' " 

IBM  Is  a  Registered  Trademarti  of  tnlamatlOAal  Business 
Machines  CcKporalion. 


The  Beginner's  Page 


C.  Regena 


Using  Disks 


I  started  programming  on  micro- 
computers about  eight  years  ago, 
when  programs  were  most  often 
saved  on  cassette  tape.  Cassettes 
were  a  reliable,  easy,  and  inexpen- 
sive means  of  program  storage  for 
home  computers,  and  disk  drives 
were  fragile  and  expensive.  In  fact,  I 
still  use  cassettes  for  program  stor- 
age on  some  of  my  computers. 
However,  nearly  all  computers  now 
are  sold  with  at  least  one  disk  drive 
as  standard  hardware.  This  month 
I'm  going  to  describe  how  beginners 
can  use  disk  drives  and  what  some 
of  the  basic  disk  commands  are. 

The  most  common  use  for  disks 
is  to  save  programs.  Saving  and  re- 
trieving programs  by  disk  is  much 
faster  than  using  cassettes,  so  most 
all  users  and  programmers  eventu- 
ally move  to  a  disk  system.  Here's 
how  to  get  started  using  disks. 

There  are  two  sizes  of  floppy 
disks  for  personal  computers:  S'A- 
inch  and  SVi-inch.  In  general,  a  pro- 
gram saved  to  disk  on  a  particular 
brand  of  computer  cannot  be  load- 
ed into  a  different  brand  of  com- 
puter. For  example,  a  program  for 
the  Apple  II  cannot  be  loaded  and 
run  on  a  Commodore  64. 

First  Step 

A  blank  disk  can  be  used  for  any 
brand  of  computer  and  disk  drive, 
as  long  as  the  size  of  the  disk  and 
drive  are  compatible.  To  use  a 
blank  disk,  you  must  first  prepare 
it.  This  process  is  called  formatting 
or  initializing  the  disk.  You  might 
think  of  it  as  preparing  the  disk  for 
a  recording  format  acceptable  to 
your  computer.  The  formatting  pro- 
cess usually  checks  for  disk  errors 
then  sets  up  a  directory  so  the  disk 
can  accept  files  (programs).  I  like  to 
prepare  several  disks  before  I  start 
programming  so  that  they'll  be 
ready  to  go  when  1  need  them. 

On  MS-DOS  computers,  the 
command  to  initialize  a  disk  is 


FORMAT,  and  there  are  several  op- 
tions (consult  your  DOS  manual). 
In  a  two -drive  system,  you  may 
specify  each  drive,  such  as  A:  for 
the  first  disk  drive  or  B:  for  the 
second  disk  drive.  You  may  specify 
/S  in  the  FORMAT  command  to 
copy  the  operating  system  files  to 
the  new  disk  (making  it  a  "boot- 
able" disk).  You  may  specify  /V  to 
use  a  volume  label,  or  a  name  for 
that  particular  disk.  These  com- 
mands are  DOS  commands  and  are 
used  when  you  see  the  DOS 
prompt  (A>).  Some  examples  are 
FORMAT,  FORMAT  A:/S,  FOR- 
MAT A:/S/V. 

If  you  use  the  /V  option,  the 
disk  will  first  be  formatted;  then 
you  will  be  asked  to  supply  a  vol- 
ume label.  You  type  in  a  name  for 
the  disk,  such  as  GAMES,  and  then 
press  the  Enter  key. 

To  prepare  a  disk  on  mouse- 
based  computers  (Macintosh, 
Amiga,  Atari  ST),  first  click  on  the 
disk's  icon  with  the  mouse.  Next, 
move  the  mouse  pointer  to  the 
drop-down  menu  for  disk  opera- 
tions and  then  select  FORMAT  or 
INITIALIZE. 

To  format  a  disk  on  the  Atari 
eight-bit  computers,  type  DOS  to 
return  to  the  DOS  menu,  then  se- 
lect the  format  disk  option. 

On  the  Commodore  64,  you 
must  open  a  command  channel  to 
send  commands  to  the  disk  drive. 
Start  by  entering  the  command 
OPEN  15,8,15.  This  tells  the  com- 
puter to  open  channel  15  to  use  the 
disk  drive,  which  is  device  number 
8.  The  last  15  indicates  you  will 
send  commands  rather  than  data. 
Now  type  PRINT*  15  to  send  com- 
mands to  the  disk.  To  format  the 
disk,  use  the  NEW  command: 
PRINT#15,"NEW:«fl7«e,fd"  where 
name  is  the  name  you  wish  to  give 
the  disk,  and  id  is  a  two-character 
identification.  For  example,  PRINT 
#15,"NEW:GAMES,88".  When  the 


format  is  complete,  close  channel 
15  by  entering  CLOSE  15. 

The  procedure  for  formatting  a 
disk  on  the  Apple  depends  on 
which  DOS  you  are  using.  For  DOS 
3.3,  load  your  favorite  Hello  pro- 
gram into  memory,  place  a  blank 
disk  in  the  drive,  and  type  'INIT 
HELLO".  When  using  ProDOS,  use 
the  system  utilities  to  format  the 
disk.  After  formatting,  copy  the 
files  PRODOS  and  BASIC. SYSTEM 
to  it  if  you  want  the  disk  to  be  a 
boot  disk. 

Notice  that  when  you  use  a 
formatting  command,  the  disk 
drive  light  goes  on  and  the  disk  is 
busy  for  a  few  moments.  Keep  in 
mind  that  when  you  format  a  disk, 
all  previous  data  on  the  disk  will  be 
lost.  You  can  format  a  used  disk — if 
you  are  sure  you  no  longer  need 
any  of  the  files  on  it.  After  format- 
ting, it  will  be  just  like  a  new  disk. 

Saving  And  Loading 

After  you  have  formatted  a  disk,  it 
is  ready  for  you  to  store  programs 
on  it.  When  you've  finished  writing 
a  program,  you'll  want  to  save  it  to 
disk.  Most  computers  use  the  SAVE 
command  with  the  title  of  the  pro- 
gram (for  example,  SAVE  TEST- 
PROG  or  SAVE  GAMEl). 

The  eight-bit  Atari  computers 
require  quotation  marks  and  the 
drive  number  followed  by  the  pro- 
gram name.  For  example,  SAVE 
"D:TEST  saves  the  program  as 
TEST  to  drive  1  (D:  is  the  same  as 
Dl:).  SAVE  "D2:TEST  saves  the 
program  to  drive  2. 

The  Commodore  64  and  128 
require  quotation  marks  around  the 
title,  followed  by  a  comma  and  the 
device  number  (8  for  drive  1,  9  for 
drive  2),  SAVE  "TEST",8  saves  the 
program  to  the  first  drive,  while 
SAVE  "TEST",9  saves  the  program 
to  the  second  drive. 

The  mouse-based  computers 
with  vdndows  usually  have  a  SATE 
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option  listed  in  one  of  the  drop- 
down nnenus.  Select  the  SAVE  op- 
tion with  the  mouse  pointer;  then 
type  in  a  program  name  (filename). 

On  the  Amiga,  DFO:  and  DFl: 
are  used  to  refer  to  the  internal  and 
external  disk  drives.  While  in 
Amiga  Basic,  use  SAVE  "DFO: 
TEST"  to  save  to  the  internal  drive, 
and  SAVE  "DF1:TEST"  to  save  to 
the  external  drive. 

When  you  save  a  program,  be 
sure  it  has  a  unique  name.  If  there  is 
already  a  program  by  that  name  on 
the  disk,  the  new  program  will  re- 
place the  old  one.  You  may  wish  to 
save  different  versions  of  a  program 
with  numbered  titles,  such  as 
TESTl,  TEST2,  TESTS,  and  so  on. 

After  you  have  saved  pro- 
grams on  your  disk,  you  can  later 
retrieve  them,  usually  with  a  LOAD 
command  followed  by  the  title  (for 
example,  IDAD  TESTl). 

On  the  Commodore  64,  you 
must  use  quotation  marks  and  the 
device  number,  as  in  LOAD 
"TEST1",8  and  LOAD  "TEST2",9. 

Eight-bit  Atari  computers  re- 
quire a  beginning  quotation  mark 


(but  the  quote  may  or  may  not  be 
closed)  and  the  drive  number,  as  in 
LOAD  "D:  TESTl  and  LOAD  "D2: 
TEST2. 

In  addition  to  the  normal 
LOAD  command,  Apple  users  can 
load  and  run  a  BASIC  program  with 
the  command  RUN  TESTl.  Apple 
ProDOS  users  can  load  and  run  a 
program  by  preceding  the  program 
name  with  a  hyphen,  as  in  -TESTl. 

On  the  mouse-based  comput- 
ers, go  to  the  drop-down  menus  and 
select  LOAD  or  OPEN.  The  avail- 
able files  will  then  be  listed  for  you 
to  select  again,  or  you  may  type  in 
the  name  of  the  program  you  want. 

Again,  DFO:  and  DFl:  are  used 
to  refer  to  the  internal  and  external 
drives  on  the  Amiga.  From  Amiga 
Basic,  LOAD  "DF0:TEST1"  loads 
from  the  internal  drive  and  LOAD 
"DF1;TEST2"  loads  from  the  exter- 
nal drive. 

Getting  A  Directory 

As  a  disk  user,  you'll  always  want 
to  be  able  to  find  out  what  files  are 
contained  on  your  disks.  This  can 
be  done  by  typing  a  command  to 


get  a  disk  directory.  On  MS-DOS 
computers,  if  you  are  in  DOS,  use 
the  command  DIR  for  directory.  If 
you  are  in  BASIC,  you  can  use  the 
command  FILES  (your  program 
will  not  be  lost  while  you  check  the 
disk  contents). 

On  the  Commodore  64,  type 
LOAD  "$",8.  When  the  computer 
comes  back  with  READY,  type 
LIST.  The  directory  is  then  listed. 
Note  that  any  program  you  are 
working  on  will  be  lost,  so  use  this 
command  with  care. 

On  the  Amiga,  use  DIR  DFO:  to 
get  a  directory  of  the  disk  in  the 
internal  disk  drive  (use  DFl:  for  the 
external  drive). 

On  an  eight-bit  Atari,  type  DOS 
to  return  to  the  DOS  menu,  then 
select  the  show  directory  option. 

On  the  Atari  ST,  from  the  COM- 
MAND window  of  ST  BASIC,  type 
DIR,  and  the  disk  directory  will  be 
printed  in  the  COMMAND  window. 

On  Apple  II  computers,  use  the 
CATALOG  command  to  get  a  list  of 
the  files  on  the  disk.  @ 


MICRO  WORLD  ELECTRONIX 


NEW  500!    J 

512K  Compuferwith  1  Disk  Drive,' 

1080  Color  Monitor.  Includes 

Software 

AMIGA  500  CALL 

IMEG  RAM  EXP         CALL 

EXTERNAL  DRIVE     CALL 


AMIGA       2000 

NOW  SHIPPING!! 

Peripherals  now  in  stock: 

A2088D  Bridgecard 

A2090  HD  Controller 

A2092  20MB  HD  W/Cont 

A2052  2  MB  Board 

A2010  3.5"  Disk  Drive 

A2002-23  Monitor 
AlOlO  External  Floppy 
CALL  FOR  NEW  3.5" 
EXTERNAL  DRIVE 


CBM  64  SOFTWARE 


CHAMPIONSHIP  BASEBAU 

GHOSTBUSTERS 

HACKER 


£T2.95 
S12.95 
$12.95 


EPSON 


LX800 

FX86E 

FX286E 

EX800 

EXIOOO 

LQ850 

LQ1050 


$175.95 
SCALL 
SCALL 
SCALL 

$504.00 
$495.00 
$669.00 


PANASONIC 

10801  MODEL  II 

$159.95 

10911  MODEL  II 

SCALL 

10921 

$295.00 

1592 

$379.00 

1595 

SCALL 

3131 

$249.00 

3151 

$CALL 

4450  LASER 

SLOW 

1524  24  PIN 

SSAVES 

Electronic  Arts 

Bard's  Tale 
King's   Quest  1,11,  in 
Space  Quest 
Leisure  Suit  Lany 
Marble  Madness 
Deluxe  Paint  II 
Deluxe  Prim 
Deluxe  Music 
Deluxe  Video 
Ferrari  Formula   I 
Earl  Weaver  Baseball 
Gridiron! 
Chessmaslcr2000 
Mathtalk 
Empire 


Microillusions 

FaeiyTale  Adventure 


S31.95 
$31.95 
S31.95 
131.95 
pl.95 
S79.95 
$69.95 
$64.95 
$79.95 
$31.95 
$31.95 
$42.95 
$29.95 
$31.95 
$31.95 


$31.95 


AMIGA   SOFTWARE 
Mindscape 

Deiavu  $31.95 

Braltacus  $31.95 

Defender  of  Crown  $31.95 

SDI  $31.95 

Sinbad  $31.95 

Kine  of  Chicago  $31.95 

Uninvited  $24.95 

SAT  Prep.  $39.95 

Microdeal 

Gold  Runner  $26.95 

Gamestar 

Baseballl  $25.95 

Foolball  $25.95 

Graphics 

Sculpt  3D  $64.95 

Aegis  Animator  $84.95 

Aegis  Draw  Plus  $159.00 


NEW  LOW  SPEED 

OSCILLOSCOPE  FOR 

IBM  OR  64 


UP  TO  (5  CHANNELS 
lOOUSSAMPUt^G 

PLUGS  IKfTO  YOUR 
CGMSjOHIBM 

DISPIAYSV0LTA6E 

WAVE  FOAMS  WITH 
8  BIT  RESOLUTION 


MODEL  MW312 

FOR  C64  $295.00 

MODEL  MW212 

FOR  PC  $360.00. 

CALL  FOR  C64 

SOFTWARE 


C64  &  128  ACCESSORIES 

MW-3S0  Parallel  Printer  Interface 
2K  BUFFER  $49.95 

lOK  BUFFER  $59.95 

C64  Power  Supplies 
Repairable  $42.95 

Non-  Repairable        $29.95 

MW-611  Universal  I/O  A  to  D  converter 

16  Analog  inputs  c-t^,' nn 

1 6  discrete  outputs  $225.00 

1  Analog  output 

MW-232  C64/I28  RS232  Serial  Interface      $45.00 
MW.401 40/80  Column  Cable  for  C128        $29.95 


SALES:  1-800-288-8088  TECH  SUPPORT:  (303)  988-5907 
Manufacturer's  Warranty  Honored.  All  Prices  Subject  to  Change  Without  Notice. 
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INSIGHT:  Atari 


Bill  Wilkinson 


That  Month  Again 


Amazing  Product  Rallies 
Information  Lunatics 

By  now,  most  of  you  have  heard 
that  Atari  has  announced  that  it  is, 
indeed,  going  to  sell  a  CD-ROM. 
The  advantage  of  a  CD-ROM  is  that 
a  single  optical  disk  can  hold  hun- 
dreds of  megabytes  of  information. 
The  disadvantage  is  that  CD-ROMs 
are  exactly  what  the  second  part  of 
their  acronyms  suggest:  Read  Only 
Memory.  The  computer  can  not 
write  to  such  a  device. 

But  the  computer  industry  is 
working  very  hard  to  overcome  this 
restriction.  Welcome  to  the  world  of 
the  WORM— Write  Once  Read 
Many.  Special  optical  disk  drives 
have  already  been  introduced  that 
use  lasers  to  write  information.  The 
data  thus  written  cannot  be 
changed,  but  it  can  effectively  be 
"erased"  and  a  later,  updated  copy 
can  be  written  to  another  part  of  the 
disk.  A  typical  home  user  could 
probably  use  a  single  such  optical 
disk  for  a  couple  of  years  before 
needing  to  copy  the  most  recent 
versions  of  all  files  to  a  new,  clean 
disk.  But  don't  hold  your  breath 
waiting  to  buy  one — at  least  not 
unless  you'd  rather  buy  one  than, 
say,  a  new  sports  car.  However  .... 

Fantastic  Option 
OverLoolced! 

I  know  it  may  be  hard  to  believe, 
but  the  designers  of  the  original 
eight-bit  Atari  computers,  way  back 
in  1979,  included  a  close  relative  of 
the  WORM  in  their  design.  True,  it 
is  slower  than  a  WORM,  and  it  isn't 
as  easy  to  use,  but  it  works!  And 
yes,  the  WORN  is  built  into  each 
Atari  eight-bit  computer! 

There  are  a  couple  of  ways  to 
use  an  Atari  WORN,  but  here  is  one 
of  the  simplest.  From  BASIC,  just 
type  in  the  command: 

POKE  803,87 

Then  load  a  BASIC  program 


type; 

SAVE  "WORN:TEST" 

Presto!  Your  program  will  be 
saved  to  this  marvelous  device.  (Hit 
RESET  to  disable  the  WORN.) 

Of  course,  you  should  be  care- 
ful not  to  rely  on  the  WORN.  Cer- 
tainly, compared  to  a  WORM, 
recovering  programs  saved  to  this 
Write  Once  Read  Never  device  can 
take  a  while.  If  you  happen  to  have 
a  LAND  device  handy,  you  can 
make  a  quick  copy  of  small  pro- 
grams saved  to  the  WORN,  but  oth- 
erwise you  will  probably  have  to 
ensure  a  reliable  connection  be- 
tween your  biological  optical  de- 
vices and  your  digital  extremity 
input  devices. 

WYSIWYG 

Another  marvelous  acronym,  pro- 
nounced "wizz-ee-wigg,"  is  an  old 
one  that  is  relatively  new  to  com- 
puters: What  You  See  Is  What  You 
Get.  Usually  applied  to  word  pro- 
cessing programs,  where  it  means 
that  the  printed  copy  will  look  like 
the  screen  display  (implying  a  high- 
er-resolution display  than  that  of  an 
eight-bit  Atari),  this  time  I  use  it  in 
its  old  meaning,  the  one  a  flea  mar- 
ket vendor  nught  use.  Take  another 
look  at  just  the  initial  letters  of  the 
words  in  my  headings  up  until 
now.  Together  they  make  a  single 
acronym.  One  very  appropriate  to 
this  month's  issue. 

Actually,  my  tale  of  the  WORN 
device  owes  much  to  tales  of  WOM 
(Write  Only  Memory)  devices  that 
have  abounded  in  computer  folk- 
lore for  ages.  (Well,  10  or  15  years  is 
"ages"  when  it  comes  to  comput- 
ers, right?)  I  remember  one  article 
that  showed  a  picture  of  a  water 
tower  and  claimed  it  was  a  WOM 
big  enough  for  a  whole  town.  So,  if 
you  don't  like  jokes,  I  apologize, 
but  I  haven't  pulled  an  April  Fool 
jest  in  a  couple  of  years.  It  was  time. 
(Oh,  yes,  the  LAND  above  is  not  an 


acronym:  I  was  referring  to  a  Polar- 
oid Land  camera.  And  biological  op- 
tical devices  are  your  eyes,  and 
digital  extremity  input  devices  are 
your  fingers,  of  course.) 

Wittiout  Honor? 

A  couple  of  my  columns  lately  have 
turned  out  to  be  mildly  prophetic  of 
other  COMPUTE!  articles.  One  arti- 
cle that  related  to  some  of  my  recent 
comments  was  "Tri-Sort  for  Atari" 
on  page  88  of  the  February  issue,  in 
which  Arthur  Horan  provides  you 
with  a  fast  machine  language  sort 
that  you  can  use  with  the  pseudo- 
fields  and  pseudorecords  I  de- 
scribed in  my  February  and  March 
columns.  The  Shell-Metzner  sort 
used  by  Mr.  Horan  is  not  the  fastest 
for  very  large  arrays  of  data,  but  it  is 
probably  quite  well  suited  for  the 
number  of  records  you  can  pack 
into  an  Atari  BASIC  string.  In  my 
March  column  (which,  of  course, 
was  written  long  before  I  saw  the 
February  issue)  I  said  that  I  hoped 
you  wouldn't  use  my  quick-and- 
dirty  bubble  sort.  With  the  help  of 
Mr,  Horan,  you  don't  have  to. 

Last  month,  I  also  promised  to 
return  to  the  subject  of  my  December 
article:  Acrostic  and  other  word 
puzzles.  Well,  in  the  December  is- 
sue I  said  that  I  had  yet  to  see  a 
really  good  crossword  puzzle  pro- 
gram. Lo  and  behold,  on  page  61  of 
the  February  issue  is  a  review  of 
Crossword  Power  (for  IBM  PCs)  that 
shows  indeed  how  limited  such 
programs  are.  I  think  the  program 
did  a  creditable  job  with  the  num- 
ber of  words  it  was  given,  but  the 
result  was  far  from  ideal. 

For  example,  a  typical  news- 
paper crossword  puzzle  is  perhaps 
5-10-percent  black  space.  The  one 
shown  in  that  review  was  more  like 
75 -percent  black  space.  Too,  it  is 
considered  less  than  ideal  for  words 
in  a  newspaper  puzzle  to  have 
more  than  one  uncrossed  letter.  In 
the  puzzle  of  the  review,  several 
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words  are  "hooked  in"  by  a  single 
letter!  In  at  least  one  case,  this  re- 
sults in  a  due  with  two  answers. 
(See  21  Across;  A  musical  instru- 
ment. Is  it  a  piano  or  cello?)  Grant- 
ed, the  reviewer  gave  the  program 
very  few  words  to  work  with  (only 
35),  but  I  can't  help  but  wonder 
how  long  it  would  take  to  generate  a 
good  puzzle  if  one  gave  it  a  list  of  a 
couple  of  thousand  words. 

More  Words  About  Words 

In  this  same  vein,  several  readers 
wrote  to  give  comments  and  sug- 
gestions about  the  acrostics  prob- 
lem. (To  refresh  your  memory:  The 
problem  is  to  write  a  program  that 
will  produce  all  valid  five-by-five 
acrostics  or  word  squares  from  a 
given  list  of  five-letter  words.  As- 
sume that  there  are  5000  words  in 
the  list.)  One  gentleman  suggested 
that  I  was  making  the  problem  too 
hard:  I  should  limit  the  number  of 
words  and  accept  the  first  puzzle 
produced.  Well,  yes,  that  wouldn't 
take  as  long,  but  that  is  kind  of  like 
building  a  chess-playing  program 
that  can  only  take  over  after  a  hu- 
man has  played  the  first  40  moves, 
and  even  then  it  can  only  play  until 
it  finds  the  first  check  (but  not 
mate).  As  a  practical  matter,  per- 
haps the  gentleman  is  right.  As  a 
mathematician  (which  I  was,  once, 
I  think),  I  want  to  see  a  problem 
solved,  not  sidestepped. 

I  even  got  two  versions  for  other 
computers.  An  Amiga  version  took 
about  three  times  as  long  on  the 
Amiga  as  on  the  eight-bit  Atari.  But 
that  is  because  of  the  inefficient 
way  that  Microsoft  BASIC  strings 
are  implemented. 

As  for  myself,  I  haven't  had 
time  to  put  together  a  complete  so- 
lution, but  I  have  started  a  couple  of 
paper  designs.  I  am  convinced  that, 
as  with  so  very  many  computer 
problems,  a  really  good  solution 
depends  on  finding  the  right  way  to 
represent  the  data  (in  this  case,  the 
word  list). 

One  possibility  is  this;  How 
about  a  "map"  wherein  every  sin- 
gle possible  five-letter  word  is  rep- 
resented by  a  YES/NO  flag?  (That 
is,  yes  or  no  that  the  flagged  word 
exists  in  our  word  list.)  In  compact 
form,  such  a  map  requires  26'5  bits, 
or  about  1.5  megabytes.  In  a  more 
practical  form  (use  a  32-bit  com- 


puter word  for  each  set  of  26  bits), 
one  still  needs  just  a  little  under  1.9 
megabytes.  Hmmm  .  .  .  anybody 
with  a  four-megabyte  ST  listening 
out  there?  (Actually,  for  efficiency, 
you  would  want  four  maps  of  in- 
creasing size — 26*2,  26'3,  26'4,  and 
26*5 — to  represent  the  possible  se- 
quential letter  sets.  With  some  intel- 
ligent compression,  all  this  might  be 
possible  in  a  half  megabyte  or  so.) 

I  also  tend  to  think  that  build- 
ing the  valid  word  set  via  a  linked 
tree  or  list  would  work  (albeit  prob- 
ably slower  than  the  brute  force 
approach,  above).  At  worst,  such  a 
list  would  need  about  75,000  bytes. 
Given  the  likely  letter  patterns  in 
5000  English  words,  I  wouldn't  be 
surprised  to  find  that  we  could 
make  do  with  30,000  bytes  or  few- 
er. (Now  we're  down  in  eight-bit 
territory  again!) 

Are  you  asking  "What  is  a 
linked  list?"  That's  a  big  topic.  For 
now,  let  me  show  you  a  way  of 
simulating  a  word  tree  in  Atari 
BASIC.  The  accompanying  listing 
looks  long,  but  you  wUl  quickly 
find  that  the  bulk  of  it  is  nothing 
but  simple  DATA  statements.  This 
program  has  no  real  practical  value, 
so  don't  feel  that  you  need  to  type  it 
in  unless  you  are  curious.  But  I  do 
hope  that  at  least  some  of  you  will 
look  at  my  word  tree  and  become 
inspired.  If  you  are,  write  to  me 
(P.O.  Box  710352,  San  Jose,  CA, 
95171-0352). 

Word  Tree 

For  inslnjctions  on  entering  this  program, 
piease  refer  to  "COMPUTEI's  Guide  to  Typing 
In  Programs"  elsewtiere  in  this  issue. 

M 100  DIM  CaUNT(3) ,LINE(3) , 

MAX(3> 
PC  110  Din  H0RD«<3)  ,LETTER«( 

t> 
K 120  8RAPHICS  0 
M200  LEVEL-0tLINE<LEVEL)-l 

000 
K  220  STOP 
H>3«0  REM  RECURSIVE  8UBR0UT 

INE 
U310  RESTORE  LINE<LEVEL) 
JK3Z0  READ  MAX 
IF  330  LEVEL-LEVEL*  t 
80  340  CaUNT(LEVEL>-llMAX  (LE 

VED-MAK 
It  390  RESTORE  LINE  (LEVEL-1  > 

+CaUNT (LEVEL) 
Ptl360  READ  LETTER*, LINE 
C!  370  WORD*  (LEVEL,  LEVEL) -LE 

TTER«i LINE (LEVEL) -LIN 

E 
■.360  IF  LINE-0  THEN  PRINT 

HORD« 
ef>390  IF  LINEO0  THEN  aOSUB 
300 


HF400  COUNT  (LEVEL) -COUNT  (LE 

VEL> 
SF410  IF  CaUNT(LEVEL)<-riAX  ( 

LEVEL)  THEN  390 
CB420  LEVEL-LEVEL- 1 
HN430  RETURN 

H.  1000  DATA  a,  (FIRST  LETTER 
8) 


M.  1001  DATA  A 
M 1002  DATA  B 
n 1003  DATA  C 
M 1004  DATA  L 
U 1009  DATA  N 
a  1006  DATA  0 
C8  1007  DATA  P 
□I  1008  DATA  T 
M 1100  DATA  1 

RB.At) 
N 1101  DATA  R 
K 1110  DATA  1 

S,  AR« 
HP  1111  DATA  E 
K 1200  DATA  1 

R8,  Bt 
» 1201  DATA  E 
M1210  DATA  1 

8,  BE* 
tP  1211  DATA  T 
•F  1300  DATA  2 

R8,  C« 
U 1301  DATA  A 
CI  1302  DATA  O 
m 1310  DATA  3 

8,  CA« 
IK  1311  DATA  N 
III  1312  DATA  P 
K  1313  DATA  T 
K 1320  DATA  1 

8,  CO* 
a  1321  DATA  T 
«P  1400  DATA  2 

R8,  L* 
H  1401  DATA  A 
CD  1402  DATA  O 
AP  1410  DATA  1 

8,  LA* 
III  1411  DATA  P 
n 1420  DATA  1 

B,  L0» 

10  1421  DATA  P 

11  1900  DATA  1 

R8,  N< 
N  1901  DATA  E 
H 1310  DATA  1 

B,  NE« 
JC  ISll  DATA  T 
n  1A00  DATA  1 

RS,  Q« 
CI  1601  DATA  R 
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Telecomputing  Today 


Arlan  R.  Levitan 


Burning  Issues  In  A  Campaign  Year 


It's  hard  to  ignore  the  fact  that  1988 
is  an  election  year.  Fertilizer  sales 
are  up  dramatically,  and  both  my 
paper  and  electronic  mailboxes  are 
full  of  epistles  enjoining  me  to  lend 
my  vote  and  as  many  bucks  as  I  can 
spare.  Unfortunately,  most  of  the 
presidential  aspirants'  positions  on 
the  burning  telecomputing  issues  of 
our  day  are  not  widely  publicized. 
Judging  from  the  response  to 
last  year's  proposed  communica- 
tions surcharges  by  the  FCC,  our 
readers  are  actively  involved  in  the 
political  process.  Spurred  on  by  a 
sense  of  editorial  duty  and  the 
thought  of  being  able  to  write  off  an 
April  vacation  in  Washington  D.C., 
I  managed  to  corral  a  fistful  of  can- 
didates and  hosted  a  brief  luncheon 
at  Georgetown's  swank  Looflirpa 
Deli.  While  it  would  be  inappropriate 
for  me  to  endorse  any  one  candidate, 
here  are  some  selected  questions  and 
answers  from  our  wide-ranging  and 
informative  session. 

Arlan:  Mr.  Hart,  many  com- 
mercial information  service  users 
have  been  complaining  that  their 
user  IDs  and  access  to  certain  types 
of  databases  have  suspended.  What's 
your  position  on  this  matter? 

Hart:  Arlan,  its  obvious  to  me 
that  these  persons  need  new  IDs, 
and  I've  been  a  proponent  of  New 
IDs  for  some  time  now.  It's  obvious 
to  me  that  our  system  has  to  be 
open  to  everyone,  regardless  of  po- 
sition or  rank,  and  that  with  New 
IDs  we  can  move  forward  and  put 
away  the  old  IDs  of  the  past, 

Arlan:  Mr.  Robertson,  some  of 
your  opponents  have  called  your 
stance  on  telecommunications  poli- 
cy "reactionary."  Your  supporters 
call  it  a  common  sense  .approach. 
Could  you  elaborate  on  the  basis  of 
your  proposals? 

Robertson:  We  need  to  return 
to  the  telecomputing  fundamentals 


that  made  this  network  great.  The 
"fast"  data  lifestyle  being  promoted 
by  the  computing  media  and  the 
manufacturers  of  9600-bps  modems 
has  impaired  our  ability  to  judge  val- 
ues. Many  of  our  young  telecom- 
puters  can't  tell  an  XON  from  an 
XOFF.  Like  my  daddy  used  to  sing 
while  typing  away  on  his  110 -baud 
mechanical  teletype,  "Give  me  that 
old-time  transmission. .  .  ." 

Arlan:  Mr.  Dupont,  you're 
generally  acknowledged  as  a  tele- 
computing arch- conservative.  How 
would  you  deal  with  the  spread  of 
dangerous  programs  created  by 
malicious  whackers? 

Dupont;  A  lot  of  users  have 
been  sharing  data  and  interfacing 
willy-nilly  with  systems  they  have 
just  a  casual  acquaintance  with.  The 
spread  of  computer  viruses  is  a 
problem  that  has  to  be  nipped  in 
the  bud  to  preserve  the  safety  of 
this  great  nation's  file  structure.  If 
elected  I  would  enact  mandatory 
data  integrity  checking  and  quaran- 
tine infected  operating  systems  un- 
til effective  anti-viral  programs  can 
be  developed. 

Arlan:  Mr.  Jackson,  although 
you're  consistently  ranked  among 
the  frontrunners,  there  is  a  general 
consensus  that  your  proposed  tele- 
computing programs  are  not  really 
compatible  with  present  conven- 
tions, and  your  proposed  file  trans- 
mission standards  are  non- 
correctable. 

Jackson:  Arlan,  I  really  don't 
understand  why  the  computer  press 
keeps  making  these  remarks  about 
my  data  not  being  correctable.  You 
don't  hear  the  press  harping  about 
the  number  of  retrys  that  Gary  Hart 
has  gone  through!  Let  me  assure 
you  that  my  base  of  support  in- 
cludes a  veritable  rainbow  of  file 
transmission  standards  from  ASCII 
to  ZModem.  Most  of  today's  prob- 


lems with  telecomputing  have  aris- 
en from  the  failure  of  the  data  net.  I 
would  expand  the  scope  and  breadth 
the  present  network  to  address  the 
needs  of  the  memory-poor  and  those 
who  are  completely  computerless. 

Arlan:  Mr.  Bush,  it's  widely 
rumored  that  your  telecomputing 
policy  statements  are  written  by 
one  Dr.  Bonzo,  a  simian  associate  of 
the  commander-in-chief.  Is  there 
any  truth  to  these  allegations? 

Bush;  You  know,  I'm  sick  and 
tired  of  hearing  about  this  so  called 
"chimp-factor."  I  am  not  a  chimp, 
and  my  expertise  in  telecommunica- 
tions is  a  matter  of  record!  As  ambas- 
sador to  China,  I  became  well  versed 
in  all  types  of  protocol.  While  direc- 
tor of  the  CIA,  I  worked  vidth  data 
encryption  techniques  on  a  regular 
basis.  1  am  also  heavily  involved  in 
Washington's  old-boy  network. 

Arlan:  Mr.  Biden,  although 
you've  officially  dropped  out  of  the 
race,  we're  still  interested  in  your 
thoughts  on  PC  Pursuit's  two-year 
delay  in  implementing  2400-bps 
service. 

Biden:  Never  have  so  many 
waited  so  long  for  so  little  through- 
put. Still,  ask  not  what  your  net- 
work can  do  for  you,  but  what  you 
can  do  for  your  network.  In  the  end 
it  will  be  said  that  this  was  their 
finest  hour  of  connect  time.  You're 
not  taping  this,  are  you?  ® 
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IBM  Personal  Computing 


Donald  B.  Trivette 


Mother  Goose 


The  folks  at  Sierra  On-Line  have 
done  it  again.  The  new  Mixed-Up 
Mother  Goose  is  great  for  small  chil- 
dren and  even  better  for  nostalgic 
adults — remember  Jack-Be-Nimble 
and  Little  Tommy  Tucker?  I  hadn't 
though  about  them  in  years. 

Mixed-Up  Mother  Goose  is  an 
adventure  game  in  the  tradition  of 
the  King's  Quest  series.  The  idea  is 
that  all  the  nursery-rhyme  charac- 
ters— there  are  18  classic  Mother 
Goose  rhymes  represented — have 
misplaced  something.  Jack  can't 
find  his  candlestick.  Bo  Peep  has 
lost  her  sheep,  and  Mary  can't  find 
her  lamb.  As  you  gallivant  around 
Mother  Goose  Land,  any  missing 
object  you  find  automatically  atta- 
ches to  your  character  until  you 
deliver  it  to  the  rightful  owner.  Re- 
unite Jack  with  his  candlestick,  for 
example,  and  you  win  points. 


Mixed-Up  Mother  Goose  was 
designed  for  young  children  ages 
four  and  up.  It's  not  necessary  for 
the  child  to  read,  however.  As  you 
approach  Bo  Peep,  for  instance,  a 
cartoon  balloon  appears  over  her 
head  with  the  picture  of  sheep. 
Miss  Peep  pines  for  her  sheep,  as 
any  four-year-old  knows.  Either  the 
cursor  or  a  joystick  can  be  used  to 
pilot  your  character  around  the 
land.  When  tests  showed  that  small 
children  had  a  heavy  finger  on  the 
cursor  keys.  Sierra  changed  the 
program  to  accommodate  them. 

A  particularly  nice  touch  al- 
lows the  child  to  select  an  icon  of 
his  or  her  own  race  and  sex  with 
which  to  identify.  This  is  the  only 
adventure  game  I've  seen  where 
the  hero  can  be  a  black  girl,  if  the 
player  wishes. 

The  documentation  and  litera- 
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ture  are  equally  well  done.  A  color- 
fully illustrated  wall  poster  has  the 
text  of  all  18  rhymes  for  those  of  us 
who  can't  quite  remember  what 
Jack  Sprat  did.  A  user's  manual  has 
help  and  tips  for  adults  and  explains 
things  like  how  to  save  sessions.  I 
can't  think  of  a  better  way  to  teach 
kids  the  classical  nursery  rhymes. 
Mixed-Up  Mother  Goose  re- 
quires a  PC  or  compatible  with 
256K,  CGA,  EGA,  VGA,  or  Hercu- 
les graphics  (joystick  and  hard  disk 
optional);  both  3V2-  and  5 '74 -inch 
disks,  copy-protected,  are  included. 
Price  is  $29.95. 

Crossword  Puzzle  Winners 

Congratulations  to  Brian  Sanders  of 
Burton,  Michigan;  Mary  Rininsland 
of  Dallas,  Texas;  and  Tina  Leniire  of 
Lexington,  Kentucky  for  submitting 
the  first  three  correct  answers  in 
this  column's  Crossword  Puzzle 
contest  from  the  February  1988  is- 
sue of  COMPUTE!.  They'll  each  re- 
ceive a  complimentary  copy  of  the 
crossword-puzzle-generating  soft- 
ware from  Wiseco  Computing  in 
Wisconsin  Rapids,  Wisconsin. 

Honorable  mentions  go  to  Sue 
Hplmer,  Isabel  Fernandez,  Dan 
Rogers,  and  Michael  Seeberger  for 
correct  answers  which  were  post- 
marked a  few  days  too  late.  And 
thanks  to  the  rest  of  you  who  took 
the  time  to  complete  and  send  in 
the  puzzle. 

Donald  B.  Trivette  is  the  author  of  A 
Quick  &  Easy  Guide  to  Dow  Jones 
News/Retrieval  published  by  COM- 
PUTE! Books.  ® 


Answers  to  February  crossword. 
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The  Elementary 
Amiga 

Part  5 


Jim  Butterfield,  Contributhg  Editor 


In  this  final  installment,  Jim  takes  a 
close  look  at  the  CLf's  RUN  com- 
mand. After  describing  several  other 
commands,  he  explains  the  often- 
misunderstood  AmigaDOS  pattern- 
matching  features. 


The  Commodore  Amiga  comes  with 
excellent  documentation.  Both  the 
Introduction  and  the  Amiga  Basic 
manuals  take  you  gently  through 
the  first  steps,  and  the  AmigaDOS 
User's  Manual  will  bring  you  into  the 
CLI  environment.  But  the  facts  don't 
always  give  you  the  flavor  of  the 
machine.  This  time,  we'll  discuss 
some  of  my  favorite  CLI  (Command 
Line  Interface)  commands  and  talk 
more  about  multitasking. 

Multitasking  is  easy,  conven- 
ient, and  sometimes  even  (dare  I 
say  it?)  fun.  It  often  takes  place 
without  your  realizing  it.  For  ex- 
ample, when  you  put  a  disk  into  the 
drive,  you  may  notice  that  the  drive 
light  comes  on  for  a  few  seconds. 
That's  a  separate  task,  or  program, 
that  the  computer  has  generated. 
This  task  will  do  its  job  without 
interfering  with  anything  else  that 
may  be  happening.  It  vanishes 
when  it  has  finished. 

By  the  way,  that's  part  of  the 
reason  you  should  wait  a  few  mo- 
ments when  you  first  crank  up  your 
Amiga.  Following  the  LDADWB 
(load  Workbench)  command,  a  task 
looks  through  the  Workbench  disk, 
checking  that  everything  is  in  or- 
der. You  can  start  cHcking  or  typing 


right  away — which  would  start  a 
new  task  in  motion — but  it's  not  a 
good  idea.  Chances  are,  whatever 
you  wanted  to  do  would  involve 
use  of  the  disk  drive.  The  two  tasks 
(yours  and  the  continuing  one) 
might  fight  for  access  to  the  disk, 
moving  the  head  back  and  forth, 
wasting  everybody's  time. 

You  will  usually  create  multi- 
ple tasks  in  one  of  three  ways.  The 
most  obvious  method  is  to  click  on 
a  Workbench  icon  to  start  some- 
thing going.  The  Workbench 
doesn't  go  away,  so  if  you  want  to 
set  something  else  in  motion,  all 
you  need  is  another  double-click 
(perhaps  with  a  little  rearranging  of 
windows  to  permit  visibility),  and 
the  next  task  is  under  way. 

A  related  method  is  to  click  on 
the  CLI  icon  repeatedly.  Each  time 
the  user  does  so,  a  new  CLI  is  creat- 
ed, complete  with  its  own  window. 
Each  CLI  is  capable  of  performing  a 
separate  task.  By  clicking  into  a  CLI 
window  and  giving  a  command,  a 
new  job  begins. 

Once  any  CLI  process  is  open, 
we  can  create  new  tasks  in  two 
ways.  The  command  NEWCLI,  as 
the  name  suggests,  asks  for  a  new 
CLI  window  to  be  opened.  You  may 
then  click  into  the  new  window  and 
start  whatever  work  you  want. 

Using  RUN 

But  the  handiest  way  of  starting  a 
new  and  separate  task  is  to  use  the 
command  RUN.  The  keyword  RUN 
is  prefixed  to  whatever  else  you 
want  to  do. 

Thus,  instead  of  ED  S/START- 


UP-SEQUENCE,  you  might  com- 
mand RUN  ED  S/5TARTUP- 
SEQUENCE.  What's  the  differ- 
ence? ED  by  itself  means  that  your 
CLI  will  go  and  do  the  ED  job;  you 
can  give  no  more  CLI  commands 
until  the  edit  is  finished  (at  least  not 
in  that  CLI  window).  But  RUN 
ED  .  ,  .  means  that  the  Amiga  will 
start  a  new  CLI  and  give  it  the  ED 
job.  In  the  latter  case,  you  could 
click  out  of  the  editor  window  to  go 
to  your  original  CLI,  for  example,  to 
look  at  a  disk  directory  while  the 
edit  is  still  under  way. 

To  take  this  example  a  step 
further;  You  could  compare,  side  by 
side,  two  text  files  by  using  two  ED 
programs  at  the  same  time.  Let's 
follow  the  command  sequence  to 
do  this: 

RUN  ED  DFO:S/STARTUF-SEQUENCE 

Now,  shrink  the  edit  window, 
click  back  into  your  original  CLI 
window,  and  then  type 

RUN  ED  DF1:S/STARTUP-SEQUENCE 

Shrink  the  second  edit  win- 
dow, too,  and  drag  it  so  that  you 
can  see  both  windows.  You  might 
arrange  them  side-by-side  or  one 
window  above  the  other.  It's  easy 
to  compare  text  files  this  way. 

Don't  forget  to  click  into  each 
edit  window  and  abandon  the  edits 
with  ESC  Q.  Or,  if  you  do  some- 
thing you  want  to  keep  on  disk,  the 
sequence  is  ESC  X. 

RUN  Windows 

In  contrast  to  the  NEWCLI  com- 
mand, RUN  does  not  create  a  new 
CLI  window.  As  you  experiment 
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with  various  commands,  you'll  see 
that  some  use  the  current  window, 
some  set  up  a  new  one,  and  some 
commands  (such  as  AMIGABASIC) 
set  up  whole  screens. 

Suppose  we  want  to  perform  a 
directory  listing  as  a  separate  task: 
While  the  directory  is  appearing, 
we'd  like  to  be  doing  something 
else.  DIR  performs  a  directory  list, 
as  does  LIST.  But  if  we  type  RUN 
DIR,  we  may  have  problems,  since 
the  results  pour  into  the  same  win- 
dow in  which  we're  trying  to  work. 
It's  messy,  to  say  the  least. 

Redirection  is  the  answer  to 
this  problem.  By  using  a  phrase 
such  as  >XXX  immediately  behind 
the  command  word,  the  results  will 
go  to  XXX.  XXX  could  be  a  file,  for 
example,  or  the  printer;  or  it  could 
be  a  window  that  we  set  up  special- 
ly for  the  job.  Let's  use  the  window 
option  (CON:)  to  illustrate  a  point 
about  placement  of  the  redirection 
command. 

I  stated  that  you  should  put  the 
redirection  signal  directly  behind 
the  command.  But  now  there  are 
two  commands  (RUN  and  DIR). 
Which  one  should  it  follow?  Try 
both  of  the  following  commands: 

RUN  >CON:20/20/500/100/fUes  DIR 

DFO: 
RUN  DIR  >CON:20/20/500/100/fUes 

DFO: 

Aha!  We  see  that  the  output  of 
RUN  is  a  simple  notice,  [CLl  2],  but 
the  output  of  DIR  is,  of  course,  the 
directory  itself.  So,  the  second  form 
of  the  command  is  the  one  we 
want,  redirecting  the  output  of  DIR. 
Now  we  can  better  understand  the 
reason  why  the  redirection  has  to 
be  carefully  placed. 

Indeed,  we  can  have  more  than 
one  redirechon.  Let's  suppose  you 
have  a  hatred  of  that  CLI  2  notice. 
You  could  throw  it  away  by  redi- 
recting it  to  nowhere,  or  device 
NIL:.  Here's  how: 

RUN  >NIL:  DIR  >CON:20/20/500/100/ 
files  DFO: 

You  can  see  that  the  CLI  notice 
was  thrown  away,  while  the  direc- 
tory came  out  as  usual. 

All  this  is  not  completely  satis- 
factory, however.  The  window  we 
set  up  vanishes  the  moment  the 
DIR  command  finishes,  giving  us 
no  time  to  read  the  last  few  files. 
We  could  get  around  this  by  setting 
up  a  script  file  containing  the  DIR 


command  followed  by  a  WAIT  and 
then  commanding  RUN  EXECUTE 
>CON:,  but  that  seems  like  a  lot  of 
work.  We  could  use  NEWCLI,  do 
the  job  in  the  new,  permanent  win- 
dow and  then  end  the  task  with 
ENDCLI. 

But  there's  an  easier  way.  Try 
this: 
RUN  DIR  >RAM:FILES  DFO: 

This  will  redirect  the  directory 
listing  to  a  file  in  the  ramdisk  called 
FILES.  At  your  convenience,  you 
may  TYPE  RAM:FILES  and  later 
delete  the  fUe. 

ECHO 

At  first,  the  ECHO  command  seems 
to  belong  only  in  the  STARTUP- 
SEQUENCE  file.  It  turns  out  to  be 
quite  handy.  If  you  make  your  own 
script  file  which  you  will  execute 
later,  ECHO  gives  you  useful  status 
reports. 

I  find  myself  using  ECHO  fre- 
quently with  redirection.  If  I  want 
to  set  up  a  disk  file  called  TEST 
which  contains  the  words  testing 
123,  I  can  quickly  type  ECHO 
>DFO:TEST  "TESTING  123" 
There  are  many  other  ways  to  do 
the  same  thing,  of  course — ED  will 
do  the  job  and  so  will  the  command 
COPY  *  TO  DFO:— but  ECHO  is 
quick  when  you  have  a  simple  job 
to  do. 

Before  listing  a  file  to  the  print- 
er, I  like  to  add  extra  information 
such  as  the  date.  ECHO  >PRT: 
"Today  is  Apr  14, 1988"  will  do  the 
trick. 

You  may  even  use  ECHO  to 
send  special  formatting  commands 
to  the  printer.  The  technical  details 
are  beyond  the  scope  of  this  article, 
but  it's  interesting  to  know  that 
ECHO  >PRT:  "*e[4w"  will  switch 
my  printer  into  "condensed  print" 
mode  ("*e[Ow"  puts  it  back)  and 
may  well  do  the  same  on  yours. 

COPY  And  JOIN 

COPY  makes  a  copy  of  a  file  (you 
probably  guessed  this),  and  JOIN 
can  do  the  same  thing.  JOIN  FILEl 
AS  F1LE2  makes  a  copy  in  exactly 
the  same  way  as  COPY  HLEl  FILE2. 

If  you  want  to  move  a  file  from 
one  directory  to  another  on  the 
same  disk,  don't  use  COPY.  RE- 
NAME will  do  the  job  more  neatly. 

Keep  in  mind  that  COPY  and 
JOIN  don't  need  to  use  disk  files: 


Any  appropriate  device  will  do. 
You  might  use  the  console  ("*")  or 
the  printer  (PRT:).  Thus,  to  list  a 
file,  you  don't  need  to  use  the  TYPE 
command.  COPY  FILE  *  will  deliv- 
er to  the  CLI  v/indow;  COPY  FILE 
PRT:  will  deliver  to  the  printer.  You 
can  even  create  an  instant  word 
processor  v«th  the  command  COPY 
*  PRT:  if  you  wish.  In  this  case, 
keep  in  mind  that  CTRL-  S  will  end 
the  file  transfer. 

If  you  want  to  print  several 
files,  JOIN  FILEl  FILE2  FILE3  AS 
PRT:  will  do  the  job.  To  separate 
the  file  listings,  you  might  wish  to 
create  a  dummy  file  with  some 
blank  lines  or  a  vertical-tab  (paper 
eject)  and  cause  that  to  be  printed 
between  each  of  the  other  files . 

I  think  the  keyword  here  is 
versatility.  At  first  sight,  a  com- 
mand seems  to  do  one  thing,  but  as 
you  learn  of  the  system's  flexibility, 
it  becomes  capable  of  much  more. 

ASSIGN,  INFO,  And  STATUS 

I  use  ASSIGN,  INFO,  and  STATUS 
frequently.  They  are  designed  to 
give  you  an  understanding  of  what's 
happening  within  your  computer. 

We've  mentioned  ASSIGN 
before.  It  can  be  used  creatively,  to 
identify  special  disks  in  the  session, 
or  routinely,  to  reassign  a  resource 
such  as  fonts  to  another  disk  (or  to 
the  ramdisk).  You  also  can  use  it 
just  for  information;  the  ASSIGN 
command  alone  gives  you  an  idea 
of  how  your  system  is  set  up. 

INFO  tells  you  about  your  disk 
resources.  It  tells  you  how  full  each 
disk  is,  plus  other  useful  information. 

STATUS  tells  you  about  the 
tasks,  mostly  the  CLI  activities,  in 
your  machine.  It's  more  for  "inner 
space"  enthusiasts,  but  it  will  give 
you  an  idea  of  the  bookkeeping 
taking  place  within  the  Amiga.  Try 
STATUS  FULL  for  more  details 
(you  don't  need  to  understand  ev- 
erything you  see  there.) 

DATE  And  SetClock 

DATE  allows  you  to  see  the  current 
date  and  time.  DATE  followed  by 
other  material  allows  you  to  set 
these  values. 

If  you  have  an  Amiga  2000  or  a 
500  with  the  memory  expansion 
fitted,  SETCLOCK  OPT  LOAD  will 
read  in  the  date  and  time  from  the 
built-in  clock. 
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If  you  don't  have  a  buiit-in 
dock,  it's  a  good  idea  to  keep  the 
date  current.  When  you  write  to 
disk,  the  files  are  time-  and  date- 
stamped.  Accurate  dates  are  a  great 
help  in  identifying  program  ver- 
sions. There  are  even  some  backup 
programs  that  update  files  if  their 
recorded  date  is  too  old. 

Your  system  disk  records  the 
last  time  and  date  at  which  a  file  was 
written.  If  you  don't  have  a  built-in 
clock,  it's  a  good  idea  to  update  this 
each  time  you  use  the  Amiga.  For 
example,  try  the  sequence: 

ECHO  >K  "X" 
DELETE  K 

This  writes  a  tiny  file  {named  K) 
and  then  immediately  deletes  it. 
Even  so,  the  disk  has  recorded  the 
current  date  and  time.  If  you're  a 
frequent  user,  remember  that  a  com- 
mand such  as  DATE  TOMORROW 
will  move  things  ahead  one  day,  or 
DATE  FRIDAY'  will  move  the  date 
ahead  to  the  following  Friday,  It's 
easier  than  typing  in  the  whole  date. 

Pattern  Matching 

Some  commands  allow  you  to  par- 
tially specify  a  file  and  then  find  it 
(or  a  group  of  files)  by  using  pattern 
matching.  The  simplest  characters 
are: 

#      any  number  of  the  following  charac- 
ter or  pattern 

7        any  character 

I        inclusive  "or"  for  characters  or 
patterns 

For  example,  A#B  means  an  A 
followed  by  any  number  of  B's, 
which  would  match  A,  AB,  ABB, 
and  so  on.  The  two  characters  #? 
used  together  are  very  powerful, 
meaning  "any  number  of  any  char- 
acters." Thus,  A#?  would  match 
any  filename  beginning  with  A, 
and  if?. info  would  match  any  file 
ending  with  .info — a  very  powerful 
feature  indeed. 

The  "or"  symbol  can  save  you 
a  lot  of  typing.  You  might  type: 
DELETE  DOOCATTMUTT*? 

This  would  delete  any  file 
named  DOG,  any  file  named  CAT, 
and  all  files  whose  names  begin 
with  the  characters  MUTT. 

Not  all  commands  permit  pat- 
tern matching,  but  it's  useful  when 
it's  there.  ® 


Apple  ProDOS 

Date  And 
Time  Stamper 


Peter  J.  McLoone 


Don't  have  a  clock  card,  but  want  to 
time  stamp  your  files?  This  program  is 
just  what  you  need.  ProDOS  is 
required. 


Like  many  Apple  II  users,  I  don't 
have  a  clock  card  for  my  Apple,  but 
I'd  like  to  be  able  to  time  stamp  my 
files.  And  since  I  usually  boot  my 
system  several  times  in  a  session, 
I'd  appreciate  being  able  to  set  the 
date  only  once,  and  have  some  way 
for  the  computer  to  remember  what 
it  was  when  I  reboot.  Even  fetter, 
when  I  boot  the  system  a  day  or 
two  later,  I'd  like  to  be  able  to  use 
the  previous  date  and  time  infor- 
mation and  change  only  what 
needs  to  be  changed — usually  the 
day  of  the  month  and  the  time. 
"Date  and  Time  Stamper"  solves 
these  problems  with  a  short  easy- 
to-use  program  you  can  customize 
for  your  own  particular  needs. 

Getting  Started 

Since  Date  and  Time  Stamper  is 
written  entirely  in  BASIC,  simply 
type  it  in,  save  a  copy  to  disk,  and 
type  RUN.  When  you  run  the  pro- 
gram for  the  first  time,  it  prompts 
you  for  the  values  for  month,  day, 
year,  hour,  and  minute.  You  enter 
these  values  as  five  numbers  sepa- 
rated by  slashes  (/).  You  must  enter 
legitimate  values  for  all  five  fields, 
The  time-of-day  values  are 
based  on  a  24 -hour  clock — that  is, 
00:00  through  23:59.  If  you're  pri- 
marily interested  in  the  date,  you 
may  want  to  set  the  time  of  day  to 
midnight  by  entering  zeros.  For  ex- 
ample, 11/5/87/0/0  sets  the  date 
to  November  5,  1987  and  the  time 
of  day  to  midnight.   Likewise, 


n/5/87/15/38  sets  the  time  of 
day  to  3:38  p.m.  The  values  you 
enter  become  the  defaults. 

When  you  run  the  program 
and  it  finds  a  default  date,  it  dis- 
plays the  date,  provides  instruc- 
tions on  how  to  change  it,  and 
prompts  you  for  any  changes. 
Pressing  RETURN  will  keep  the  de- 
faults. You  may  keep  as  many  of 
the  defaults  as  you  like  by  using 
slashes  as  a  place  holder.  For  ex- 
ample; ///1 6/ 15  keeps  the  defaults 
for  the  month,  day,  and  year  while 
setting  the  time  of  day  to  16:15  (4:15 
p.m.).  If  you  type  /6  followed  by 
RETURN,  the  day  of  the  month  is 
changed  to  6  and  the  defaults  will  be 
used  for  the  other  values. 

How  It  Worics 

The  program  works  by  examining 
the  MODIFIED  field  in  the  ProDOS 
catalog  entry  for  the  file  identified 
by  the  variable  FI$.  If  it  has  a  date, 
the  program  uses  it  to  determine 
default  values.  If  it  doesn't,  then  the 
program  prompts  you  to  enter  all 
five  fields.  Once  you  provide  a  le- 
gitimate set  of  values,  the  program 
sets  the  appropriate  locations  in 
memory  so  ProDOS  will  start  using 
it,  and  then  saves  itself  to  a  file 
named  FI$,  puffing  the  new  date 
into  the  MODIFIED  field  in  its  Pro- 
DOS  catalog  entry.  If  you  don't 
change  any  fields,  it  sets  the  appro- 
priate memory  locations  and  stops. 
One  way  to  use  Date  and  Time 
Stamper  is  in  your  startup  routine. 
You  may  want  to  add  the  following 
statement  to  the  end  of  your  START- 
UP file: 

PRINT  CHR$(4);"-SET.DATE.TIME" 

This  will  run  the  program  automati- 
cally when  you  boot.  Another  pos- 
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sibility  is  to  make  Date  and  Time 
Stamper  itself  your  STARTUP  pro- 
gram. Anything  you'd  like  to  do  at 
startup  can  be  placed  into  the  pro- 
gram in  lines  100  to  1999.  You  must 
also  change  the  value  of  FI$  in  line 
10; 

10  FI$= "STARTUP" 

The  program  assumes  the  startup 
drive  is  device  1  in  slot  6  (the  usual) 
and  searches  the  main  directory  on 
that  volume  for  FI$.  Line  60  needs 
changing  if  your  startup  device  lo- 
cation is  different.  The  program 
also  sets  the  screen  to  80  columns. 
Delete  line  50  if  your  Apple  doesn't 
have  this  capability.  You'll  also 
want  to  revamp  the  print  state- 
ments in  lines  3600-3835  and  5100- 
5300  to  provide  a  more  pleasing 
output  v^^ith  a  40-column  display. 
Date  and  Time  Stamp  has  a 
simplified  check  for  leap  year  that 
won't  fail  until  2100,  so  it  shouldn't 
present  a  problem.  If  you're  still 
using  your  Apple  II  in  the  year 
2000,  hov/ever,  the  year  check  in 
line  26200  can  be  modified. 

Date  and  Time  Stamper 

For  instructions  on  entering  tfiis  program, 
please  refer  to  "COIvlPUTEi's  Guide  to  Typing 
in  Programs"  elsewhere  In  this  issue. 

»  5   REM   COPYRISHT    l<?e8  COMPUTE! 

PUBLICATIONS,     INC. 
a  8    REM   ALL   RIQHTS   RESERVED. 
n  10  FI*   -   -SET.DATE.TIMH"!    REM 
makB  mura  flla  na««  i%  U 

PPER   c»* 
41  20   D«   -   CHR«    (4)iNULL   -   -    1 
If  50    PRINT    D»I"pr«3"l    REM      a«t 

•cr«>n  to  B0  coltmnm 
B«  60  PRINT   MfprafiK    ,s&,dl"t 

REM  Sat  prmfiK   to  tha  naa 

a  of  tha  uaual  atartup  dri 

va 
a   70  PRINT  'Tha  ProDOS  Data  and 

Tloa  Staapar' 
C3  80  PRirft    "Copyrigtit    1988  COHP 

UTE!  Publicationa,  tnc.'i 

PRINT  "All  rlgKtB  rmmmrvmii 

M 

il  90  I 

37  2000  REM Find  catalog  a 

ntry  for  Fl*  and 
»  2100  REM    >••  If  it  haa  a  d 

ata  nodi f lad  

A7  2200  PRINT  D«|  "praf  Ik"!  INPUT 

LI* 
72  2300  PRINT  "Voluaai  't  HID*  < 

Ll«,2,  LEN  (Ll«)  -  2) 
H  2400  PRINT  D«|*opan*Ll«",tdlr 

"I  PRINT  D«|'raad  "Ll» 
«7  2500  INPUT  Ll«i  INPUT  Ll*l  IN 

PUT  Ll»i  REM  akip  ftrmt 
thraa  llnaa 
n  2&00  INPUT  CE«i  REM  Catalog  E 

ntry 
82  2700  IF  Ce»  -  ""  THEN  PRINT  D 

•|"cloma  "I  SOTO  5000 
U  2800  IF  MID«  (CE«,2,  LEN  (FI« 

))  <  >  FI«  THEN  2600 
M  28S0  PRINT  D*|"clo*a  ' 


84  2899    t 

Iff  2900    IF  MID*    (CE«,31,9)    -    "<N 

0   DATE>"    THEN    5000 
2i  2950  REM thara  la  a  da 

fault  data  

ei  3000   DY   «   VAL     (    MID*    (CE*,31, 

2)>iMO*   -   MID*    (C£«,34,3 

)iYR  ••   VAL    (    MID*    (CE*,3 

B,2>> 
24  3300    I    -    1 
6F  3400    IF   MO*    <    >   MID*     { " JftNFEB 

HM^tPRMAYJUNJULAUGSEPQCT 

N0Sn)EC*,I,3)     THEN    I    -    I 

+  3 I  eOTO  3400 
7»  3S00  MO  -  (I  +  2)  /  3lHR  -  VA 

L  (  MID*  (CE«,41,2>)iHN 

-  VM^  <  MID*  <CE*,44,2>) 
a   3590  PRINT  t  PRINT  "Dafault  d 

atat  "MO|"/"|DY|"/"iYR|" 
Dafault  tlMai  "|HRt 

"i"|i  IF  HN  <  10  THEN  PR 

INT  "0"! 
8C  3393  PRINT  MNi  PRINT 
A9  3600  PRINT  "You  may  changa  an 

y  portion  of  tha  dafault 
data.   Entar  up  to" 
IB  3800  PRINT  "flva  ona  or    tMO  d 

igit  valuaa  aaparatad  by 
•laahaa  In  tha  ordar" 
1«  3810  PRINT  "aonth/day/yaar/ho 

ur/alnuta.  If  you  daalra 
to  changa  only" 
H   5820  PRINT  "a  faM  1  tana,' than 
antar  only  a  slash  for 

tha  itaiBS  you  Hi*h' 
94  3830  PRINT   "to  skip.    For   axaa 

pla  /S///30  changas  only 

tha  day  and  nlnuta  and" 

M  3B35  PRINT  "/28  changaa  only 

tha  day.  A  raturn  Mill  k 

aap  all  tha  dafaulta." 
U  3900  PRINT  t    INPUT  "Entar  naM 

dat*/tiaai"|Ll* 
41  3930  IF  LI*  -  ""  THEN  QQSUB  3 

0000t  END 
87  3999  I 
IC  4000  QOSUB  100001  REM   to  par 

sa  tha  data/tlata  string 
AD  4050  IF  ER  THEN  3900 
27  4200  IF  8(1)  <  >  NULL  THEN  MO 

-  8(1) 

K  4300  IF  S<2)  <  >  NULL  THEN  DY 

-  8(2) 

J2  4400  IF  3(3)  <  >  NULL  THEN  YR 

-  3(3) 

4i  4500  IF  SC4)  <  >  NULL  THEN  HR 

-  8(4] 

II  4600  IF  S(S)  <  >  NUU.  THEN  HN 

-  S(5) 

n   4700  QOSUB  20000>  REM   to  cha 
ck  Mhathar  data  tlaa  is 
valid 

l«  4800  IF  ER  <  >  0  THEN  3000 

H   4900  QOTO  6000 

a   49S0  REM  thara  Is  NO  da 

fault  data  

2!  5000  REM   can't  find  fila  FI* 
or  fila  FI*  has  no  data 

V  5100  PRINT  :  PRINT  "Entar  tha 

data  and  tiaa  as  fiva  v 

aluaa  saparatad  by  slash 

as,  l.a.  (" 
Bl  5200  PRINT  "aonth/day/yaar/ho 

ur/iiinuta.  For  aKsapla, 

10/5/86/13/30  is 
14  5300  PRINT  "Octobar  3,  1986, 

military  tlaa  15t30  or  3 

■30  pn. " 

VI  5350  PRINT  "All  valuas  nust  b 

a  antarad. 
B»  5400  PRINT  I  INPUT  "Enter  dat 

•/tiaai"|Ll* 
27  5500  eOSUB  100001  REM   to  par 


sa  tha  data/tima  string 
IB  5600  IF  ER  eOTO  5100 
IB  3650  MO  -  3<1):DY  -  3<Z)jYR  - 
a<3)iHR  -  3(4>iMN  -  8(3 

) 
9F  5700  OOSUB  200003  REM   to  cha 

ck  whathar  data  tima  is 

valid 
CI  SB00  IF  ER  THEN  5100 
ID  S900  : 

f1   6000  PRINT  :  PRINT  "New  dace: 
";MO!"/'*;DY;"/";YR;" 
New  time:  "jHR;":";:  I 

F  MN  <  10  THEN  PRINT  "0" 

J 
38  6100  PRINT  MN:  PRINT 
99  6200  SOSUB  30000:  REM  to  stor 

s  new  date  in  mamory 
«  6300  PRINT  D«; "UNLOCK  ";FI«s 

PRINT  D«;"SAVE  ■';FI»:  PR 

INT  D*!"LOCK  "}FI* 
il   6400  PRINT  "If  the  new  date  i 

s  incorrect  rerun  ";FI«J 

HI  6500  END 

E«  10000  REM  ========-===PAR5E 

AC  10100  ER  =  0:B  =  liP  =•  liLl« 

"  Ll»  +  "/////" 
44  10270  FOR  J  -  1  TO  5 
CO  10300  IF  MID*  (L1«,P,1)  <  >  " 
/■■  THEN  P  -  P  +  1:  SOTO 
10300 
H  10350  IF  B  ■  P  THEN  S(J)  =  NU 

LL:  BOTO  10800 
«  10400  IF  B  <  P  THEN  OK  =  I:  F 
OR  I  -  B  TO  P  -  liC*  - 
MID*  (Ll«, I, 1):QK  -  OK 
AND  <C»  >  -  "0"  AND  C* 
<  -  "9")  OR  C»  »  "  ■':  N 
EXT 
12  10500  IF  OK  THEN  B(J)  =  VAL  ( 

MID*  (L1«,D,P  -  8>) 
J9  10700  IF  NOT  OK  THEN  ER  -  1 : 
PRINT  "Field  "jJi"  is  n 
ot  a  number . " 
5F  10800  P  =  P+lsB»P!  NEXT 
iS  19000  RETURN 

71  20000  REM   ===-==™=~CHECK 
BC  20050  ER  -  0 

3E  20100  IF  MO  <  1  OR  MO  >  12  TH 
EN  ER  -  li  PRINT  "Inval 
Id  value  for  month." 
AB  20600  IF  MO  =  9  OR  MO  =  4  DR 
MO  =  6  OR  MO  =  11  THEN 
MAX  =  30:  QOTO  23000 
3?  20700  IF  MO  <  >  2  THEN  MAX  = 

31 J  QOTO  23000 
«  22000  MAX  ■«  Z8s  IF  (YR  /  4  - 
INT  (YR  /  4) )  -  0  THEN 
MAX  -  29 
C9  23000  IF  DY  <  1  OR  DY  >  MAX  T 
HEN  ER  -  1:  PRINT  "Inva 
lid  value  for  day." 
li   ■ZblL'S^    IF  YR  <  87  OR  YR  >  99  T 
HEN  ER  -  I:  PRINT  "Inva 
lid  value  for  year." 
61  26300  IF  HR  <  0  DR  MR  >  -  24 
THEN  ER  -  1:  PRINT  "Inv 
alid  value  for  hour. " 
FB  26400  IF  MN  <  0  OR  MN  >  =  60 
THEN  ER  =  1:  PRINT  "Inv 
alid  value  for  minute." 
ti  29000  RETURN 
38  30000  REM   -==.»=====STORE 

IB  30050  REM   destroys  MO  DY  YR 

FA  30100  YR  =-  YR  »  2 

C<   30200    IF   MO    >    7    THEN    YR    =    YR 

+    1:M0    =    MO    -    8 
91   30300    DY    =    DY    +    MO    «    32 
31    30400   POKE    4904 l.VR:    POKE    490 
40, DY:     POKE    49043, HRi     P 
OKE    49042, MN 
6B   30600   RETURN  © 
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Screen  Print 
For  Atari 


Richard  Tietjens 


Transfer  your  favorite  computer  art- 
work and  illustrations  from  screen  to 
paper  with  this  excellent  screen- 
dump  program — the  best  we've  ever 
published  for  Atari  computers.  For 
the  Atari  400,  800,  XL,  and  XE  with 
disk  drive  and  printer  (Epson  or 
Epson-compatible,  Okimate  10,  Big 
Blue  Printer,  or  Star  NP-10). 


When  r  first  bought  my  Okimate  10 
color  printer,  I  tried  several  screen- 
dump  programs  to  pririt  pictures. 
Unfortunately,  I  wasn't  happy  with 
any  of  them — they  were  all  too 
slow,  and  they  didn't  support 
enough  picture  formats.  To  solve 
the  problem,  I  wrote  Screen  Print,  a 
powerful  and  fast  screen  dump  that 
supports  a  variety  of  file  formats 
and  several  printers. 

Screen  Print  prints  any  picture 
file  created  vnth  Micro  Painter,  Micro 
Illustrator,  and  Fun  with  Art.  It  can 
also  print  the  GEIAPHICS  8  and 
GRAPHICS  9  files  that  many 
BASIC  programs  create.  Depending 
on  what  printer  you  use,  you  can 
print  in  color  or  black-and-white. 
Screen  Print  produces  a  full-width 
printout  that's  better  than  the 
dumps  produced  by  most  commer- 
cial programs. 

Typing  It  In 

The  program  is  written  mostly  in 
BASIC,  but  machine  language  rou- 
tines are  used  for  the  time-critical 
sections.  Type  in  Program  1  and 
save  it  to  disk  with  the  command 
L1ST"D:MAIN,LST".  Do  not  at- 
tempt to  run  the  program  yet. 

Program  2  is  designed  to  create 
the  machine  language  strings  used 
in  the  program.  Type  in  Program  2. 
If  you  plan  to  use  this  program  with 


the  Star  NP-10  printer,  make  the 
indicated  change  in  line  3210.  Save 
the  program  to  disk,  and  then  type 
RUN.  It  should  create  the  file 
DATALINE.LST  on  disk. 

Programs  3-6  contain  program 
lines  that  enable  Screen  Print  to 
work  with  your  printer.  Type  in  the 
appropriate  program  and  save  it  to 
disk  with  the  command  LIST"D; 
MYPRINT.LST". 

To  make  a  working  version  of 
Screen  Print  for  your  printer,  type 
the  following  commands: 

NEW 

ENTER"D:MAINXST" 

ENTER"D:DATALINE.LST" 

ENTER"D:MYPRINT.LST" 

If  you're  using  the  Big  Blue 
Printer  version  of  the  program,  de- 
lete line  400  and  lines  4100-4170 
from  the  program. 

Be  sure  to  save  the  program  to 
disk. 

Printing  Pictures 

When  you're  ready  to  try  Screen 
Print,  load  and  run  the  program.  If 
you're  using  a  130XE  with  DOS  2.5, 
you  may  first  want  to  use  the  DOS 
copy  command  to  move  your  pic- 
ture file  to  the  ramdisk.  This  will 
make  printing  significantly  faster. 

When  the  title  screen  appears, 
you  can  view  the  directory  of  any 
disk  by  pressing  the  number  of  the 
drive.  Press  8  for  a  directory  of  the 
ramdisk.  From  the  directory  listing, 
you  may  use  the  cursor  keys  and 
the  SELECT  key  to  select  a  picture 
to  print.  To  return  to  the  title 
screen,  press  RETURN, 

After  you  select  a  picture,  it  is 
loaded  and  displayed  on  the  screen. 
Depending  on  your  printer,  up  to 
four  keys  are  now  active.  Press  8  to 
print  a  GRAPHICS  8  screen,  9  to 
print  a  GRAPHICS  9  saeen,  M  to 


print  in  monochrome,  or  C  to  print 
in  color. 

If  you  chose  to  print  a  GRAPH- 
ICS 8  or  9  screen,  you  may  now 
press  OPTION  to  reverse  all  screen 
colors.  This  feature  lets  you  print 
"negative"  images. 

If  you  chose  monochrome 
mode,  all  colors  change  to  a  shade  of 
gray.  You  can  change  the  brightness 
and  contrast  by  pressing  a  number 
in  the  range  1-4.  Use  whichever 
combination  is  most  pleasing. 

Finally,  if  you  chose  a  color 
printout,  a  color  menu  appears. 
Make  sure  that  you  have  a  color 
ribbon  installed  in  your  printer. 
You  can  now  use  the  cursor  keys 
and  the  numbers  0-7  to  change  the 
saeen  colors  for  the  best  printout. 

When  you're  ready  to  print 
your  screen,  press  START.  A  tone 
sounds.  Make  sure  that  your  printer 
is  online.  If  you  have  an  Epson 
printer  and  are  printing  in  color,  use 
a  pencil  to  make  index  marks  on  the 
paper  at  the  tear-off  bar.  Press 
START  again  to  begin  printing  or 
SELECT  to  return  to  the  title  screen. 

If  you  are  using  an  Epson  or 
compatible  printer,  you  will  be 
prompted  to  reinsert  and  realign 
the  paper  for  each  pass.  For  the  best 
picture  quality,  be  as  accurate  as 
possible. 

For  instnjctions  on  entering  those  programs, 
please  refer  to  "COMPUTEI's  Guide  to  Typing 
In  Programs"  elsewhere  In  this  Issue 

Program  1 :  Screen  Print 
Main  Program 


OB  10  R 
P 
C 
D 

!1I  190 

111  209 
BL  210 
M.  220 


EM  COPYRIGHT  19BB  COM 
UTE!  PUBLICflTIDNS,   IN 
ALL  RISHTS  RESERVE 


N10&-1 0^1  TOP-PEEK (N10 
6)iBQT0  1000 
IF  QMODE-NS  OR  BMODE- 
N9  THEN  2190 
IF   NOT  CLF  THEN  BOSU 
B  2070iaOTO  260 
FOR  I-Nl  TO  N3lC0LDUR 
(n-PEEK(N707+l)  I  NEXT 
IiCOLOUR(N0>-PEEK(N7 
12) ■ COLOUR (N4)-N0iPaK 
E  N106,TOP-N32»QO8UB 
16B0 

HI  230  GRAPHICS  N0lPaKE  N106 
,  TOP 

OJ  240  SRAPHICS  N63iG0SUB  14 
S0IFOR  I-Nl  TO  N3:P0K 
E  N707  +  I,COLOUR(t>  iNE 
XT  IlPOKE  N712, COLOUR 
(N0) ■ SOSUB  2900 

PI  250  IF  CLF  THEN  LET  DUMP* 
(N106)-PIX« 

m 260  FOR  Y-NIS  TO  N0  3TEP 
-0.St3aUND  N0,Y,N10,Y 
I  NEXT  Y 

W26S    FOR  I-N0  TO  LEN(DUMP* 
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W267 

N  270 
DP2B0 
IK  290 

CO  300 
IM  315 

EE330 

usee 

U390 
400 

Ii410 
II  420 

LH  430 
440 

UK  4S0 

CD  460 


U  530 
HO  550 

EF5&0 

LFS&S 


01  S70 


ni  575 
K  580 

0  590 
FO600 

A  610 


) I  POKE  PAQE6+I,PEEK(A 
DR(DUnP*)-»-I)  iNEXT  I 
eRFl*""   START  TD  PRI 
NTC6  SPACE8}SELECT  TD 

ABORT  -tBOSUB  2980 
FOR  V-N15  TO  N0  STEP 
-0.25 

SOUND  N0,N1S,N10, INT( 
Y)iNEXT  Y 

IF  PEEK  (CQNSOD-NS  TH 
EN  POKE  N106,TOPiBOTO 

1150 
IF  PEEK(CaNaOL)<>N6  T 
HEN  290 
eRFl«-"4:i4  SPACES>PRtN 

TINS <14  SPACE8>-iaO 

SUB  2980 

aRFl*-CHR*(N0) iBRFltC 
N4B0>B8RFl«teRFl« (N2} 
-GRFl«t 6RF2«-BRFl*ieR 
F3«-eRFl«iORF4a-QRFl« 
X-U8R (PAeE6, ADR (BRF4« 
)  ,Dn) 
8RFl«>SRF4«t  Orl-DH+N40 

X«USR (PABE6, ADR (BRF4* 

>  ,DM) 

QRF20-BRF4«i DM-DM+N40 
X-UBR (PABE6, ADR (QRF4* 

>  ,Dli> 

BRF3«-eRF4«iDM-Dni-N40 
X-USR(PAQE6,ADR(9RF4« 
)  ,DM> 

IF  PASS  THEN  DM-Dn+N4 

0 

X-U8R<ADR(ADD«) ,ADR<G 

RFlt) , ADR (GRF2«) , ADR ( 

3RF3«)  ,  ADRORF4*)  ,  N4B 

0,PASS) 

POKE  77,N0iSOTO  1150 

REH  ■;iJ;1M>^J;JJ^I.lryjMH 

CLOSE  tNliOPEN  *N1,N1 
2,N0, 'Si " 

POKE  N709,N0tPOKE  N71 
0,N10iPOKE  N712,Ne>P0 
KE  N752,Nlt?  #N1|"  "1 
SOSUB  1480 

POSITION    N14,N0t7    «N1 
l"Activ*    KayBt"!?    ttNl 
I'tBy^SSMSiiVi    B  E  ^ 
E<3    SPACEBXDEL    LINE> 
{CLR    TABJ     (SET    TAB> 

{INS  LiNE>   {BXii^xmc: 

{V>" 

T»»"Dll ». »"|T«(N2,N2) 
-DN«iFIL«-"" 
TRAP  9601  CLOSE  ttNSlOP 
EN  ttN5,N6,N0,T«iF-N0 
TRAP  6301  INPUT  WNSlFN 
* 

T«-FN»CN11,N13) I  IF  T» 

-"SYS"  OR  T*-"COM"  OR 

rii""BA3"  OR  T«-"9AV" 

OR  FN«(N4,NB)-"  FREE 

"  THEN  590 

IF  VAL (FN«(N1S, N17} ) > 
83  THEN  5901  REM  WEESM 


lCOL-(F- 
OaiTION 
:?  ttNllF 
L«(FtNll 
13) 
90 

24-Nl J? 
adlng  pr 
or  CtV>" 

N  ttNS,N4 

0 

N0  THEN 


FF  620  RDW-INT(F/N3) 
R0igtN3)  tN13lP 
C0L+N1,RQW+N3 
N*(N3,N13) : FI 
+N1J-FN* (N3,N 

CB  623  F-F+NllBOTO  5 

i[  630  POSITION  N2,N 
ttNl|"Aft*r  Lo 
•m«  E,  m,     S, 
t 

KC  635  CLOSE  tNSiOPE 
,N0, "K: ": FN-N 

HP  640  IF  LEN(FIL«)- 
670 


01645  HHERE-FN«Nll-«-NllROU-I 
NT(FN/N3> iCOL-(FN-ROW 
»N3> »N13lP0SITiaN  COL 
+Nl,R0W+N3lFN»-FIL»(W 
HERE,  WHERE-4-N10>  t  T«»FN 
• 

ID  630     X-U8R(ADR(  INV*)  ,  ADR(T 

•  >  ) 
61660  7  ttNl|T«t 

Dl  670  IF  PEEK  (CONSOL>-NS  TH 

EN  BOTO  810 
C!  680  IF  PEEK(CH)-'N2aS  THEN 

670 
Pe690  BET  «NS,KPiPOKE  CH,N2 

SS 
P6  700  IF  KP-28  OR  KP-43  THE 

N  eOSUB  770IFN-FN-N3I 

BOTO  780 
re  710  IF  KP-29  OR  KP-61  THE 

N  Q08U8  770iFN'FN+N3i 

BOTO  780 
0(1720  IF  KP-30  OR  KP-43  THE 

N  B08U8  770IFN-FN-N1I 

SOTO  780 
011730  IF  KP-31  OR  KP-42  THE 

N  SOSUB  770iFN-FN'«-Nll 

BOTO  780 
NS740  IF  KP>47  AND  KP<52  OR 
KP-S6  THEN  DN«-CHR»< 

KP>iCLOSE  *NSiSOTQ  56 

0 
JC750  IF  KP-155  THEN  1150 
KD  760  aOTO  670 
M 770  R0W-INT(FN/N3) iCOL-tF 

N-RDHtN3) tNlSlPOSITIO 

N  C0L+Nl,ROH-)-N3i?  «N1 

tFN«t I  RETURN 
00  780  IF  FN<N0  THEN  FN-F-Nl 
HI  790  IF  FN>F-N1  THEN  FN-N0 
OL  800  SOTO  640 
Iflai0  T»-FN»«FN*-"Dll "iFDR 

I-Nl  TO  NBl IF  T«(I, I) 

<>"  -  THEN  FN»<I+N3)- 

T«(I,  I) 
IKa20    NEXT     IiIF    T«(N9,N11}< 

>" IZ    SPACES}"     THEN    FN 

•  (LEN<FN«)-^N1>-''.  "(FN 
»<LEN<FN»)+N1)-T*(N9, 
Nil) 

LH  830  FN*<N2,N2)"DN*lTRAP  9 
60lCLaSE  ttNSlOPEN  ttNS 
,N6,N0,FN«i INPUT  ttNS, 
T«i CLOSE  «N5i CLOSE  ttN 
liPTypE-N0 

OL  840     IF    T*(N1S,N17)-"04S" 
AND    T*(N3,N4)""0P"     TH 

EN  pTVPE-NttREn  aauai 

KH  850  IF  T»(Nia,N17)-"062'- 
THEN  PTYPE-N2iREM 


CB  860  IF   NOT  PTYPE  THEN  CL 

Q8E  «NSiOPEN  «NS,N4,N 

0,FN«iBET  «Na,BllBET 

ttNS,B2lQET  ttNS,B3iGET 

*NS,B4|CL0SE  »N5 

l(CB70  IF   NOT  PTYPE  THEN  IF 

B1-N254  AND  B2-B1  TH 

EN  PTYPE-NSlREH  HaiEM 

Br  880  IF   NOT  PTYPE  THEN  IF 
Bl-N23a  AND  B2-N128 
AND  B3-201  AND  B4>199 
THEN  PTYPE>N4iREH  ■£ 
gTil:»»«B»IB*l»>;l»tr!» 
OC  890  IF   NOT  PTYPE  THEN  CL 
OSE  #Nli7  "tCLEAR> 
{3  BELL>NOT  A  RECOBNI 
ZED  PICTURE  FILE!"iBO 
TO  1370 
tC900  BRAPHICS  N32-N1IS0SUB 
14B0tO«PEEK(NS59) ■ PO 
KE  N559,aiCLaSE  tNllO 


PEN  «N1,N4,N0,FN* 
PJ910  ON  PTYPE  B08UB  1390,1 

390, 1560, 1500 
CH920  POKE  N359,Dt  CLOSE  «NS 
lOPEN  •N5,N4,N0, -Ki I " 
PN930  BET  #Na,KPiIF  KP067 
AND  KP077  AND  KP056 
AND  KP057  THEN  930 
M940  CLF-(KP-67> iBMODE-KP- 
N48tIF  BM0DE>N9  THEN 
BM0DE-N15 
6H9S0  FOR  Y-N15  TO  N0  STEP 
-0.5i BOUND  0,N2S4,N10 
,INT(Y)iNEXT  YiBOTO  2 
00 
18  960  B08UB  98017  "<3  BELL} 
43  D0WN>ERROR  -  "  |  PEE 
K(195>t''  ON  DISK  ACCE 
SS!{3  DOHNy'tSOTO  137 
0 
M 970  BOSUB  9B0>7  "{3  BELL} 
ERROR  -  "iPEEK< 195) I " 
WHILE  PRINTINQ! 'lOOT 
0  1370 
HC  9B0  BRAPHICS  N0I  POKE  N710 
,99 1  POKE  N712,99iP0Ke 
N709,N14i6OTO  1480 
LI  990  REH  »i:**»t-.^m*4m 
no  1000  N0-0t  Nl-l  ■NZ-2tN3-3t 
N4-4iN5-3iN6-6iN7-7i 
NB-8iN9-9t N10-10IN11 
-1  liN12-12iN13-13iNl 
4-14iN15-lSlN16-16lN 
17-17 
no  1005  N20-20iN24-N8thl3iN30 
-N10tN3lN32-N16«N2iN 
40-N10tN4iN48-N16»N3 
tN63-63lN101-101lN12 
B-N16tNaiN2S4-2S4lN2 
33-255 
NH  1010  N256-N128tN2iN4B0-N4 
B«Nl«lN559-559lN7a7- 
707  I N70e-708i N709-70 
9iN71»-710lN712-712i 
N752-752I PABE6-N256* 
N6 
DF  1020  POKE  N106,TOPiBRAPHI 
CS  N2+N16iP0KE  N710, 
N0t BOSUB  14801?  »N6i 
7  ttN6| "INITIALIZINB. 

PK1030  C0NaaL-53279lP0KE  77 
,N0iCH-764 

IH1040  DIM  GRF1*(N4B0>  ,SRF2 
•(N480) ,QRF3»(N480) , 
QRF4« (N4a0) , BRISOUMP 
•(117) ,BR9DUMP*(lfl9) 
,CI0«(N7> 

M 1030  DIM  PIC«(N30) .K«(N2) 
, FN* (N30> , T« (N30) , IN 
V« (N30>,FIL«(704) ,C0 
L0UR(N6) , ADD* (110) ,R 
EV*(N30) 

U 1060  DIH  DUMP*(ia9) ,PIX*( 
36) ,C*(N24) ,DN*(N1) , 
KOALA* (344) , CRYPT*  <3 
00) ■DN*-CHR«(49} 

M 1070  BOSUB  3010 

K1150  BRFl*-"  "iaRFl*(N40) 
-BRFlVlBRFl* (N2)-BRF 
l*inBB-(T0P-N32) tN2S 
61QOSU8  29B0 

LFlt35  SRAPHICa  N2-t-N16l  POKE 
N710,N0iGOSUB  14801 
LET  DUMP*-BR13DUMP*i 
POKE  19S,N1 

If  1170  7  «N6l  7  #N6|  " 

<3  3PACE9JCOYRIBHT  1 
98B{10  8PACEB>C0nPUTE 


pr  11S0  7  *N6l? 


PRESS 
«N6|  - 
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m  1190 

7  #NAi7  ttN6| -   PRESS 

Pit 

1520 

CLOSE  ttNllRETURN 

it  Color  M»nu" 

D  E  E  or  a:"i7  •N6t  " 

OL 

1530 

POP  |Q-PEEK{N559) iPO 

it  1800 

CLOSE  ttN5lOPEN  ttNS,N 

{3  SPACES) FOR   DIREC 

KE  N559,N0 

4,N0, "Kl "1 X-N10I Y-N6 

TORY" 

m  1940 

IF  PEEK(CH)-N299  THE 

■POSITION  X,Yi7  " 

B)  1 200 

Bl-N0lB2>NlSlB3-0.2S 

N  1540 

tRieHT>CLEFT>"| 

tB4>N0t CLOSE  ttNSiOPE 

B  1 990 

POKE  N999,aiaDTO  115 

FL  1 8 1 0 

IF  PeEK(C0N80L)-N6  T 

N  «NS,N4,N0, "Kl " 

0 

HEN  1940 

M  1210 

FOR  I-Bl  TO  B2  STEP 

Bl  1560 

OET  «Nl,BltQET  ttNl.B 

HL  1820 

IF  PEEK(CH)-N255  THE 

B3IPDKE  N710, 1 

liGET  ttNlfBllPOKE  N7 

N  1810 

Ht  1220 

IF  PEeK(CH)-N23a  THE 
N  1250 

12,BliF0R  I-N0  TO  N2 
taET  ttNl.BliPOKE  N70 

AF  1S30 

POSITION  X,Yi?  " 
tRiaHT>fLEFT>"i « BET 

EH  1230 

BET  #Na,XlPOKE  CH,N2 

e+I,BltNEXT  I 

ttN5,KPiP0KE  CH,N255l 

aat  IF  X-N32  THEN  POP 

00  1970 

POKE  850, N7l POKE  892 

C-(Y-N6)tN3+X/N10 

iBOTO  1280 

,PEEK(BB) iPOKE  853, P 

EB  1840 

IF  KP>47  AND  KP<56  T 

Lf  1240 

IF   (X>N4a  AND  X<S2) 
OR  X-56  THEN  DN«-CHR 

EEK(B9)lP0KE  856, N0I 
POKE  897, Nl 

HEN  ?  CHR*(KP) 1 tC*(C 
,C)-CHR*(KP-N4B)  i  X-X 

•(X}lPaP  ICLOSE  «N&| 

LB  1SB0 

X-USR(ADR(CIO*) ,N16) 

+N10tQaTa  1890 

QOTO  S60 

OP  1990 

POKE  850, N7i POKE  892 

JA  1850 

IF  KP-2B  OR  KP-45  TH 

F)  12S0 

IF  PEEK(77)-N2S4  THE 

,PEEK(8a) iPOKE  853, P 

EN  Y-Y-NliBOTO  1890 

N  1530 

EEK(B9)iP0KE  856,240 

ID  1860 

IF  KP-29  OR  KP-61  TH 

n  12SS 

IF  X-67  .THEN  PGP  I  DO 

(POKE  BS7, 15 

EN  Y"Y+NllBOTO  1B90 

8 

If 

1600 

X-USR(ADR(CtO*) ,N16) 

AF  1870 

IF  KP-N30  OR  KP-43  T 

FB  1260 

NEXT  I 

P£ 

1610 

DM-PEEK (88) +N296<PEE 

HEN  X-X-N10IBOTO  189 

HE  1270 

B4-BliBl-B2tB2-B4lB3 

K(89) IDH-DM+240+N256 

0 

— B3I80T0  1210 

*N15lBZ-INT(DI1/N2S6> 

le  1 880 

IF  KP-31  OR  KP-42  TH 

EH  1280 

QRAPHICS  N0iPaKE  N71 

■B1-DM-B2«N256 

EN  X-X+N10iBaTO  1890 

0,90lPQKE  712,50iPOK 

K  1620 

POKE  850, N7i POKE  892 

DO  1890 

IF  X>N30  THEN  Y-Y+Nl 

E  7a2,NllB0aUB  1480 

,BliPOKE  B93,B2lP0KE 

1X-NI0 

m.  1290 

RESTORE  39201  CLOSE  * 

836,N16iP0KE  857, N0 

BL  1900 

IF  Y>13  THEN  Y-N61X- 

NSlOPEN  #NB,N4,N0, "K 

IC 

1630 

X-USR(ADR(CtO*> ,N16> 

N10 

■-■Y-N0iPaKE  CH,N2SS 

HB 

1640 

POKE  850, N7i POKE  892 

OH  1910 

IF  X<N10  THEN  Y-Y-Nl 

K  1300 

TRAP  1320IREAD  QRFl* 

,BllPOKE  ag3,B2iP0KE 

1 X-N30 

I  IF  BRFl«-"\"  THEN  1 

a56,N16iP0KE  857, Nl 

W  1920 

IF  Y<N6  THEN  Y-13|X- 

320 

4 

N30 

IB  1310 

7  0RF1«I?  iY-Y+N2iIF 

IE  1690 

X-USR(ADR(CIQ*> ,N16) 

H  1930 

POSITION  X,Yi?  " 

K  1320 

Y<N20  THEN  1300 
IF  PEEK<195>-N6  THEN 
POSITION  N1,N20+N2i 

fP 

1660 

CLOSE  ttNllRETURN 

tRIBHT>tLEFT>"l  1  BOTO 
1810 

CA  1 0  /  V 
K  1680 

POKE  731, N255I TRAP  4 

FO  1940 

CLOSE  ttNSlPOKE  752, N 

7  "PRESS  {B>r^!ts{VJ  T 

0000 

I1PO8ITION  N2,N16i? 

0  RETURN  TO  TITLE  PA 

m  1690 

RESTORE  36201  FOR  A-N 

"Morklngi  Pla«««  ttta 

BE "I  SOTO  1340 

0  TO  51 1  READ  BtPOKE 

nd  by. . . <4  8PACE8>" 

JE  1330 

POSITION  N1,N20+N2t? 

PAaE6+A,BiNEXT  A 

^^  rm  r^         w    had    ^r  r^         li  ^r  -  r%  r%  u  r* 

n  1942 

FOR  Y-N15  TO  N0  STEP 
-0.51SDUND  N0,N101, 

'  IBi^-Jzlmi^^H-A-.fVy     TO 

1700 

FOR  I-Nl  TO  NSlPOKE 

&4  d  im            \J            &I  ^~  ^  ^F            \^ 

CONTINUE  {B>nPT«CV} 

PABE6+I , COLOUR ( I-Nl ) 

N10, Yi NEXT  Y 

TO  QUIT"! 

1710 

Bl>PEEK(PABE6-t-I  )+N10 

LK  1945 

PIX«-<CHR*(N0)  lPIX«(N 

H  1340 

SET  «N5,KPlIF  KP-N32 
THEN  ?  "CCLEflRJ"lY" 

1 T-Bl-N256t (Bl >N299) 
■POKE  PA6E6+I+N6-N1, 

40-N4>-PIX*iPIX«(N2) 
-PIX* 

IP  13S0 

m.  1360 

N0ieOTO  1300 

IF  KP-27  THEN  1150 

QOTO  1340 

K   1720 

TiNEXT  I 

BRAPHICS  N0IPOKE  N7 1 

0,N0 

CA  1950 

BYTE-N0 1 STR I NQ-ADR ( P 

IX*) iFOR  C-Nl  TO  N24 

STEP  N61FOR  B-N0  TO 

ai  1370 

CLOSE  ttN5tDPEN  ttNS,N 

1730 

QOSUB  1480iDL-PEEK(5 

N2i  X-ASC(C«(C-)-B)  ) 

4,N0,  "Kl"iPDKE  195, N 

60>+N2S6«PEEK(561) iF 

EC  1960 

BLUE-INT<X/N4> 1 X-X-B 
LUEtN4 

61POKE  752,NliG0Ta  1 

OR  I-DL+N10  TO  DL+N2 

320 

■«-N16  STEP  N2IP0KE  I, 

IJ  1970 

RED"I NT ( X /N2  >  t  YELLOW 

U  1380 

REM  ■■■li1>M:Mi*«»fcllJriJB 

1740 

PEEK(I)+N126lNEXT  I 
POKE  512,NlllPDKE  31 

NH  1980 

■■X-REDtN2 

POKE  STRINB+BYTE.YEL 

'.^•l;3dsi;H 

CA  1390 

POKE  850, N7i POKE  852 

3,N6iPQKE  54286,192 

LOHtPOKE  STRINB+BYTE 

,PEEK<SB> IPOKE  853, P 

1730 

C*-CHR*(N0) iC«(N24)- 

+NI2,REDlPOKE  STRINB 

EEK (89)1  POKE  BS6,N0t 

C*iC*<N2>-C« 

+  BYTE+N24, BLUEt  BYTE- 
BYTE-t-NliNEXT  B 

At  1400 

POKE  857, N30 

IF  PTYPE-Nl  THEN  POK 

BK 

1760 

PPM   ■•^^■•(■maI;H±Jrti:il 

m  1990 

BYTE-BYTE-N3IF0R  B-N 

E  856, 2241  POKE  857,2 

CI 

1770 

?  "tDOWN>S»t  CdIotb 

3  TO  N9t X-ASC (C* (C+B 

)  > 

BLUE-INT (X/N4)  1  X-X-B 

LUEtN4 

(01410 

1 

X-U8R(A0R<CI0*> ,N16) 

to  Printi"!?  "B-eutAj 
d   1-YELLDW   2-ReD 

JE  2000 

m  1420 

TRAP  1440 

{4  SPACES>3-0RANBE" 

K  1430 

SET  «Nl,XlPOKE  N712, 
XiFOR  I>N0  TO  N2ieET 

Dfl 

1780 

7  "4»BLUEt3  SPACESJ3 
-QREENt3  SPACE5>6-VI 

HL  2010 

RED-INT(X/N2) 1 YELLDH 
-X-RED*N2 

•NlfXlPOKE  N70B-*-I,X 

OLET  7-BLACK" 

LC  2020 

POKE  STRINB+BYTE, PEE 

INEXT  t 

HB 

1783 

POSITION  N0,N4i?  "CD 

K (STRINB+BYTE) +YELLa 

W*N2 

POKE  STRINB+BYTE+N12 

EE  1440 

IF  PTYPEONl  THEN  CL 
OSE  ttNllRETURN 

LOR" I  POSITION  N0,N5l 
7  "LUME" 

H(2030 

Nt  1490 

8ET  WNl, CRYPT 

JE 

1790 

FOR  Y-N6  TO  NI2  STEP 

,PEEK(8TRINB+BYTE+N1 
2}+REDtN2 

Ft  1460 

DM-PEEK«B8>+256tPEEK 

N2i Bl -COLOUR (I  NT (  (Y 

(B9J 

-N6) /N2) ) IB2-INT (Bl/ 

LO2040 

POKE  8TRINB+BVTE+N24 

M  1470 

XoUSR (ADR (CRYPT*)  ,  DM 

N16) !B3-Bl-B2tN16 

, PEEK (STRINB+BYTE+N2 

, 5600, CRYPT) 1  RETURN 

IB 

1792 

POSITION  N2,Y:?  B2tP 

A>+BLUE«N2 

LO  1480 

POKE  N16, 112iPaKE  S3 

03ITI0N  N2,Y+Nli?  B3 

KH2050 

BYTE-BYTE+NliNEXT  Bl 

(£  1490 

774, 1121  RETURN 
TRAP  960 

it   1795 

FOR  X-N10  TO  N30  STE 
P  N10IPOSITION  X,Yl? 

NEXT  Ci RETURN 

00  206(9 

REM  ■:l>9«il>.-«M[i>^1»M.i:M>! 

IB  1S00 

RESTORE  32501  FOR  I-N 

N0IPO8ITION  X,Y-»-Nlt 

r^^a 

0  TO  N20tREAD  BllPOK 

7  N0INEXT  XiNEXT  Y 

HI  2070 

POKE  N712,N0lPOKE  N7 

E  PAaE6+I,Bl»NEXT  I 

Hf 

1797 

POSITION  N2,N16t?  "P 

08,N4iPOKE  N709,N8lP 

EE  1510 

A-USR (ADR (KOALA*) > 

r«ss<B>aiIIII]i:v>to  •>! 

OKE  N710,N12iCLO8E  » 
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NSlOPEN  ttNS,N4,N0,'*K 

1  ■" 
iJ  2075  60SUB  2900 
Fe2080  IF  PEEK(C0N80L)-N6  T 

HEN  21fi0 
HL2090  IF  PEEK<CH>-N23S  THE 

N  2080 
U2100  BET  #N5,KPiP0KE  CH.N 

2SS 
An  21 10  IF  KP-N4B+N1  THEN  PD 

KE  N712,PEEK(N712)+N 

4 
OE2120  IF  KP>N4S+N1  AND  KP< 

N4e'^Na  THEN  POKE  70i> 

+KP-N4B, PEEK  <706+KP- 

N4B)+N4 
ir2130  FOR  I-N70e  TO  N712iP 

OKE  I,PEEK(I)*(PEEK( 

I)<N16)tNEXT    I 
li;2140    8QT0    2080 
US  2130   REM   ■M"':Ja«t""'H"  ='»*■■ 


W2160  POKE  (ADR«DUMP«)+N10 
1) ,N9-PEEK(N712» /N4t 
N3 

U2170    FOR    I-Nl    TO    NSiPOKE 
<ADR(DUMP«>+N101+I) , 
N9-PEEK  (N707  +  I  >  /MiN 
SiNEXT    I 

1*2180  CLOSE  ttNStPOKE  CH,N2 
5SlCLF>>N0>  RETURN 

flH2190  SRAPHICa  N40+NliBOSU 
B  14801  LET  DUnP«-eR9 
DUMPttQOSUB    2900 

M2195    IF    BHODE-NB    THEN    BRA 
PHIC8    N40+N16I6O8UB 
1480ILET    DUMP«-eRlSD 
UMPkiREBTORE    313Sl80 
SUB    2900 

a  2197    IF    8H0DE*>N8    THEN    FOR 
I-N0    TO    NI2-NI1READ 
BliLET    DUMP«(N106+I 
)-CHR«(Bl) iNEXT    I 

JH  2200  IF  PEEK(CQNSaL)-N3  T 
HEN     X-USR(ADR<REV«> > 

a2210  IF  PEEK<C0NS0L>-N6  T 
HEN    260 

10)2220    GOTO    2200  

M2e90    REn     fBtfipji^l^if  l.'Ta 

0)2900    DL-PEEK(S60)+N2S6tPE 

EK(561> ■Q-PEEK(NSS9) 

iPOKE  NS59,N0 
PB2910  DL-DL-N2iPaKE  DL,112 

■POKE  DL+Nl, 112IB2-I 

NT(DL/N256) tBl-DL-B2 

*N25& 
IL2920  POKE  DLt-202,  Bit  POKE 

DL-t-203,B2iPOKE  960,  B 

It  POKE  561, B2 
0  2930  B2-INT(M98/N296) iBl- 

M86-B2«N256 
FL2940  POKE  DL-^N3,  Bl  i  POKE  D 

L-i-N4,B2lPOKE  DL+N2,6 

6 
FF29S0     IF    BMODE>NB    OR    BliODE 

-N9    THEN    QRFl*-"       OP 

TION  TO  INVERT 

<a  8PACEa}START  TO  P 

RINT       " 
BB2960    IF       NOT    CLF    AND    BI1GD 

E-N13  THEN  QRFl*-" 

12  3  4  FOR  SHADES 

C3  SPACES>START  TO  P 

RINT   - 
BO  2980  POKE  NSS9,QiF0R  I-N0 
TO  N40-N1IPOKE  HSG+ 

I,PEEK(ADR(BRF1«>-I-I> 

-N32INEXT  I 
8N  2990  POKE  19S,  Nl  1  RETURN 
06  3090  RESTORE  31201  FOR  I-l 

06  TO  117IREA0  BI18R 

lSDUnP«(I)»CHR«(Bl> I 


1113120 
BF  3130 

M3139 

PJ  3140 
n  3240 


NEXT 
REM 

DATA  0,0,0,1,0,2,1,2 

,1,3,3,3 

DATA  3,3,3,3,3,0,0,0 

,3,0,0,0 

REM  mt^^m-.ifAtssm 

REM  ■M.r:WiM«il;l.lJ;l 


m3290  DATA  162,16,169,1,13 
7,72,3, 169,0, 197,73, 
3,32,86,228,48, 1,96, 
104, 104,96 
REM 


n  3270 
If  3610 

n(3620 
113630 
HA  3640 


)l  36S0 
Al  3660 
CF  3700 
AK  3710 


U1  3720 
EI  3740 


H3790 
a  3760 
MI3770 

n.3780 
K  3790 


AC  3800 
K  3810 


F!  3B20  DATA  0,6,6,12,18,24, 
24 , 30 , 36, 42 , 42 , 48 , 94 
,60,60,66 

AA3e30    REM    mSMISSIMBm 

a  3840 

Nt  3890 

KE  3860 
JB  3870 
IK  3880 
BF  3890 


REM  »lI|J»iUMBIi*MIWta»* 
|J;ii:M 

DATA  0,0,0,0,0,0, 10, 
10, 10, 10, 10.72, 138,7 
2,  192,72 

DATA  169,259,141,10, 
212, 174,0,6, 189,  1,6, 
141,24,208, 189,6 
DATA  6.141,23,208,23 
2.224,9,208,2,162.0, 
142,0,6, 104, 168 
DATA  104,170,104,64 

RESTORE  37401 Bl-Nl 
TRAP  37201  READ  B2iQR 
9DUMP* (Bl ) -CHR* (B2>  I 
BloBl+NliBOTO  3710 
RETURN 

DATA  104,104,133,204 
, 104, 133,203, 104,  133 
,206, 104, 133,203, 160 

0  24 
DATA  177,209,41,240, 
106, 106, 106, 106,32,3 
0,6,76,33,6, 170, 152 
DATA  72,189,92,6,170 
, 160,0, 189, 107,6, 145 
, 203, 232, 200, 192, 6 
DATA  208,245,104,168 
,96,24, 169,6, 101,203 
, 133,203, 165,204, 109 

DATA  133,204,177,205 
,41, 15,32, 30,6,24,  16 
9,6, 101,203, 133,203 
DATA  169,204,103,0,1 
33,204,200, 192,40,20 

8, 180,96 

REM    maiy.mitfAidim 

REM    M-.TJ*la>^ 


AD  3900 
KB  3910 
AA  3930 


REM    mmj^iSSSMl 

DATA  3,3,3,3,3,3,3,2 

,3,3,3 

DATA  3,3,2,3,2,3,2, 1 

,2,3,2,3,2,1,2,3 

DATA  2, 1,2, 1,2, 1,2, 1 

,2,1,2,1,0.1,2,1 

DATA  2, 1.0, 1,0, 1,0, 1 

,0, 1,0, 1,0,0,0, 1 

DATA  0,0,0,0,0, 1,0,0 

,0,0,0,0.0 

REM    KEMIXaXSH 

REM    Mi«T-.^<;llf**<ii:aM 

DATA    Th«    iii>nu    will     d 


laplay  all  filBnamas 

,*xc*pt  thoK«  with  t 

ha  foil ohI ng 
FD  3940  DATA  filanam*  •xtana 

ions  I  SYS  COM  BAS  SA 

V 
1113950  DATA  Uaa  tha  arroH  k 

ays  to  highlight  tha 
HJ  3960  DATA  fila  yau  wish  t 


o  load  I  praa«  «  nunb 

mr 
BE  3970  DATA  kay  to  gat  a  na 

H  diractoryi 
BD  3980  DATA  or  praaa  {B>aMl 

fgsicvy    to  load  tha.h 

Ighllghtad  flla. 
•1:3990  DATA  A+tar  tha  pictu 

ra  appaara 
BF  4000  DATA  praaa  {B>E{V>  f 

or  a  color  print| 
014010  DATA  prasa  {B}E{V>  f 

ar    a  monochrona  prin 

t| 
Ft  4019    DATA    prasa    {B>t£{V>    f 

or    a    Braphica    8    prin 

ti 
P1>4020    DATA    praaa    CB>i:{V>    f 

□r    a    SraphiCB    9    prin 

t.,\, 
HP  4030    DATA    If    you    aalact    B 

raphlcs    8    or    9    you    c 

an 
DE4040    DATA    praaa    {B>tiiaXX9r 

<V}  to  Invart  all  ac 

raan 
Jt  40S0  DATA  colors.   Rapaat 

as  daslrad . , \, 
QD  4060  DATA  For  a  monochroa 

a  print  praaa,  {B>E! 

<.v>  isyEivy  iBy&ivy   or 

<B>C<{V}  to  adjust  t 

ha 
PM  4070  DATA  gray  ahadaa  on 

tha  scraan.   Tha 
BE  4080  DATA  prlntad  plctura 

Mill  follow  tha 
)F4090  DATA  scraan  shadas. , 

\ 
LI  4100  DATA  A  color  print  w 

ill  pauaa  aftar  you 
PC  41 10  DATA  prass  {B}B{V>  w 

hlla  tha  color  aanu 

la 
104120  DATA  craatad.   Hhan 

It  appaara  tha  top 
LP  4130  DATA  of  tha  acraan  w 

111  list  tha  colora 
114140  DATA  available  and  t 

ha  four  color  banda 
If  4190  DATA  diaplay  your  cu 

rrant  cholcaa.  Prass 
1114160  DATA  a  nunbar  kay  to 

aalact  a  color  or 
IE  4170  DATA  an  arrow  kay  to 
aova  tha  cursor., \, 
JN4230  DATA  Tha  {B>SCCIlIl 

{V}  kay  ands  tha  adj 

ustaant 
AN  4240  DATA  phaaa  of  all  du 

■pat  Ba  sura  tha 
IF  4250  DATA  prlntar  ia  aat 

up  for  tha  typa  of 
PK4270  DATA  in  placai  papar 
poaitionad  proparly 

) 
JG42B0  DATA  and  prass  {B}gS] 

COaiCV?  to  print  lt| 
H8  4290  DATA  or  prass  {B>gll! 

IISDCV}  to  raturn  to 

tha 
EN4300  DATA  tltla  paga  with 

out  printing. 


Program  2:  Data  Line  Maker 

Nl  10  REM  COPYRIBHT  1988 

EF  20  REM  COMPUTE!  PUBLICATI 

0N8,   INC. 
HP  30  REM  ALL  RISHTS  RESERVE 

D. 
m 180  REM 
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M)1020    GRAPHICS    0iPOKE    710, 
IfliPOKE    712,12atP0Ke 
709,0 1  POKE    732,  li7 

EJ  102S    7    "Pl«a>*    Inmvrt    dl« 
k    containing*!?    t7    " 
liAIN.LST    in    Drlv«    1 
and"!?    i7    "pras* 
tB>iiHX[=iitVJ" 

HG  1030  IF  PEEK(a3279)<>6  TH 
EN    1030 

W103a  7  CHR«<12S)i7  i7  »Wr 
Itlng  DATALINE.LaT"! 
?    I?    "Plaaa*    Malt. . . 

M 

JF1040    DIM    QR19DUnP*(117)  ,C 

I0*(7) 
Ft  1 090    DIM    INV«(30)  ,  ADD«(11 

0) ,REV«<30> 
Ft  1060    DIM    DUMP*  ( 189)  ,CRVPT 

«e300> ,K0ALA«<342> 
eN106a    CLOSE    «tiDPEN    *1,B,0 

, "DiDATAUINE.LST" 
K 1070    RESTORE    3010lFaR     I-l 
TD    7IREAD    BllCtOXI 

)-CHR»(Bl ) iNEXT    I 
U 1073    ?    «1|-3010    CIO*-"|CH 

R« (34> |CI0«|CHR*(34> 

Vise*  RESTORE  3040rFDR  I-l 

TO  laSlREAD  BliSRlS 

DUMP«(I)-CKR« (Bl)  INE 

XT  1 
HI  1 089  ?  til  "3040  8R19DUMP* 

-■■|CHR«(34)  I8R1SDUMP 

«(1,60) |CHR«(34} 
PC  1087    7    ttl|-3043    eRlSDUMP* 

(61)-*|CHR«(34> (ORIS 

DUMP»<61, 1«S> |CHR*(3 

4) 
It  1090  RESTORE  31&0tFaR  I-l 
TO  110IREAO  BliADD* 

(I)-CHR«(B1) iNEXT  I 
OF  1093  ?  til  "3160  AOD«>"|CH 

R«(34> |ADD*tCHR*(34) 

1X1110  RESTORE  3530iFOR  I-l 

TO  42iREA0  BliCRYPT 

«<I)-CHR«(Bl>iNEXT  I 
HI  11 13  7  •1|-3S30  CRYPT«--| 

CHR«(34) I  CRYPT* 
HI  1120  RESTORE  S980tFOR  I-l 
TO  301  READ  Bit INV«( 

I)-CHR« (Bl) iNEXT  I 
IU1129  7  ttll-ZSBO  INV*-"|CH 

R«(34) t  tNV* 
M(1130  RESTORE  3680IFOR  I-l 
TO  30IREAD  BliREV*( 

I>-CHR«(B1) iNEXT  I 
KllSa  7  All "3680  REV*-"|CH 

R«(34) iREV* 
U11S0  RESTORE  32B0iFaR  I-l 
TO  3421  READ  BliIF  B 

1-lSS  THEN  Bl-0 
LSliaa  KaALA*(I>-CHR*(Bl)  tN 

EXT  I 
EF1160  7  ttl|"32B«  KOALA*-"! 

CHR* (34) (KOALA* (1,73 

) 
BP116S    7    «lf3290    KOALA*(76 

)-"|CHRS(34) I  KOALA* ( 

76, 150) 
U1170    7    «1|"3300    K0ALA*(13 

1)-"|CHR*(34) ) KOALA* 

(131,227) 
EK117S    ?    ttl|'3310    KOALA*  (22 

e>-CHR*(lS3) " 
nil80    ?    *1|"3320    KOALA* (22 

9) -" I CHR* ( 34>  t  KOALA* 

(229,300) 
Ulieg    7    •1|"3330    KOALA*  (30 

1>-"|CHR« (34) t KOALA* 

(301,342) 
PL  1200    CLOSE    #li7    i7    "Flni« 

h»d! "iPOKE  792,017  I 

END 


HI  3000    REM 


iiai;t.»>T=¥gr 


IE  3010    DATA     104,104,104,170 

,76,86,228 
EH  3020    REM    MtVJliW 
FI  3030    REM    ^SISmSM^ESE^^SHSL 

EK3040  DATA  104,104,133,207 
, 104, 133,206, 104, 133 
,209, 104, 133,208, 160 
,e,24 

El  30S0  DATA  177,208,41,192, 
106, 106, 106, 106, 106, 
106,32,32,6, 76,66,6 

KC  3060  DATA  170,152,72,189, 
101,6, 170, 160,0, 189, 
103,6, 149,206,232,20 
0 

M 3070  DATA  192,3,208,243,1 
04, 16B, 169,3,24, 101, 
206, 133,206, 163, 207. 
105 

EN30e0  DATA  0,133,207,96,17 
7,208,41,48, 106, 106, 
106, 106,32,32,6, 177 

ni  3090  DATA  208,41,12,106,1 
06,32,32,6, 177,208,4 
1,3,32,32,6,200 

LC3100  DATA  192,40,208,171, 
96,0,3,6,9 

ES  3 1  1 0    REM    msJ^MISSMSBm 

n)31S0   REM   mftin:ii!m»,i,'iMTmiT-- 


113160  DATA  104,104,133,209 
, 104, 133,208, 104, 133 
,211, 104, 133,210,  104 
, 133,213 

013170  DATA  104,133,212,104 
,  133,213, 104, 133,214 
, 104, 133,217, 104, 133 
,216, 104 

103180  DATA  104,133,218,169 
,0, 168,24, 177,210,  10 
, 10, 113,208, 143,208, 
24 

FF3190  DATA  177,212,10,10,1 
0, 10, 113,208, 143,208 
,24, 177,214, 10, 10,  10 

re  3200  DATA  10,10,10,113,20 
8, 166,218,224,0,240, 
1, 106,41, 127, 143,208 

M3210  DATA  200,240,8,166,2 
17, 224, 0, 208, 203, 240 
, 14, 198,217,230,209, 
230 

CP3214  REM  THE  FOLLOWINS  LI 
NE  REPLACES  LINE  321 
0    FOR    NP-10    PRINTERS 

W3215  REM  DATA  200,240,8,2 
34,234,234,234,234,2 
34 , 234, 234 , 234 ,217,2 
30,209,230 

PI3220  DATA  211,230,213,230 
,219, 169,0,240, 189,  1 
96,216,208, 189,96 

I:F3230    REM    »HMiVJi«» 

B>3280    REM    ■aB«iW«»il.3H^Bai 

M3290    DATA     104,162,16,169, 

7. 197.66.3. 169.232.1 
57,68,3, 169,0, 157 

tj  3300  DATA  69,3,169,1,157, 
72,3, 169,0, 137,73,3, 
169,0,133,224 

LII3310  DATA  32,0,6,165,224, 
201,7,240, 13,201,  13, 
240, 16,201,26,240 

96  3320    DATA    60,230,224,24,1 

44.234. 163.232. 133.2 
34,24, 144,244, 163,23 
2,  141 

JP3330  DATA  196,2,230,224,3 
2,0,6, 163,232, 141, 19 


7,2,230,224,32,0 

013340  DATA  6,169,232,141,1 
98,2,230,224,32,0,6, 
165,232, 141, 199,2 

K3350  DATA  230,224,32,0,6, 
165,232,141,200,2,24 
, 144, 196, 169,0, 133 

IF  3360  DATA  236,133,230,163 
,88, 133,224, 133,228, 
163,89, 133,229, 133,2 
29,32 

M3370  DATA  0,6,192,136,240 
,94, 169,0, 133,227, 16 
3,232,41, 128, 133,233 

H133B0  DATA  169,232,41,127, 
133,226,208, 14,32,0, 
6, 165,232, 133,227, 32 

C£3390  DATA  0,6,165,232,133 
,226, 198,226, 165,239 
,208,28,32,0,6, 165 

IIK3400  DATA  232,133,233,24, 
144,47, 198,226,  169,2 
33, 197,226,208,249,  1 
98,227 

M3410  DATA  169,233,197,227 
,208,237,240, 183,32, 
0,6, 165,232, 133,233, 
24 

« 3420  DATA  144,19,198,226, 
169, 255, 197, 226,208, 
238, 198,227, 169, 255, 
197,227 

EK3430  DATA  208,230,240,155 
,96, 169,2, 197,234,24 
0,82,240,201 , 165,233 
,  160 

m 3440  DATA  0,143,224,24,16 
9,80, 101,224, 133,224 
,169,0, 101,225, 133,2 
25 

At  3430  DATA  230,230,169,96, 

197.230.208.47. 169. 1 
, 197,236,208,24,24, 1 
69 

M3460  DATA  1,101,228,133,2 
28, 133,224, 169,0, 133 
.236, 133,230, 101,229 
,133 

EM  3470  DATA  229,133,225,24, 
144, 17,230,236.24, 16 
9,40, 101,228, 133,224 
,  169 

(F3480  DATA  0,133,230,101.2 

29. 133.223. 163.239.2 
40,  176,208, 149, 163,2 
33, 160 

JL  3490  DATA  0,145,224,24,16 
9, 1, 101,224, 133,224, 
169,0, 101,225, 133,22 
5 

FI  3900  DATA  165,239,240,151 
,208,229 

OE3920  HBnm333MammM3isisms 

U 3530  DATA  104,104,133,204 
, 104, 133,203, 104, 133 
,209,230,209, 104, 170 
,232, 104 

PK3940  DATA  104,133,206,160 
,0, 177,203,69,206, 14 
9, 203, 230, 206, 200, 20 
8  2 

DP  3990  DATA  230,204,202,208 
,240, 198,205,208,236 
,96 
REM 


REM  E«miTr»ff7iiraiy 


PP3560 
ni3570 


M35a0  DATA  216,104,104,133 
,204, 104, 133,203, 169 
,0, 168, 162, It, 177,20 
3,73 
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IE3S90    DATA    12S,  t4S,  203,  2i0 

,202,208,246,96 
K3600    REM    ■'XMJV^IJEM 


U3670    REHipmi»*Mfi0M;Mgcg 

113680    DATA    216,104,163,89, 

133,204, 163,88 
FH3690    DATA     133,203,169,0,1 

6S, 162,31, 177 
0.3700    DATA    203,73,233,143, 

203,200,208,247 
CI  3710    DATA    230,204,202,208 

,242,96 

Program  3:  Line  Changes 
For  Okimate  10 


«L  40    REM 


E£Xia! 


n;»<arui.i 


U 320    TRAP    9701  CLOSE    ttNliOP 

EN    «N1,NB,N0, "Pi "i7    « 

N1|CKR« (27) |CHR«(66) | 

CHR*<27) tCHR«(37) 

JfSSe    DM-PEEK (BB)+N256»PEEK 

<89> IPASS-N0 
Cf360    FDR    Y-N0    TO     191-S0t(P 
TVPE-Nl)     8TEP    S.SiLIN 
E-DH 
K370    IF    CLF    THEN    FOR    C-N0 
TO    N2iFaR    I-N0    TO    N3l 
POKE    PAQE6+N101+I,C«N 
12+I«N3iNEXT    IiDN-LIN 
E 
LI  46S    IF       NOT    CLF    THEN    S00 
Ji  470    IF    C"N0    THEN    ?    ttNl|CH 

R«(1S3) I 
N  480    ?    •Nl|8RFl«tIF    C-iN2    T 
HEN    7    «N1|CHR«(138> )C 
HR«(N14) I 
IP  490    NEXT    C 

MS00    IF       NOT    CLF    THEN    7    ttN 

1|8RF1«|CHR«(139)|CHR 

•(N14> I 

KS10  PASS-  NOT  PASSlNEXT  Y 

nS20  ?  •N1|CHR*(14S) iCLOSE 

•  Nl 
HE  1160  7  ttN6|'{4  8PACEa}{Sa5 
[g=ll««»  :ilH"  I  ?  «N6|" 
{6  aPACE8}FDR   THE" I 
7  ttN6|"CS  8PACEa}okl 
MatB-10" 
M 3920  DATA  This  Bcraan  dun 
p  progrsM  Is  sst  up, 
for  ths  aKIHATE-10  p 
ri  ntsr . 
(14260  DATA  duap  chasan  (rl 
bban  or  thsrnal  paps 
r 

Program  4:  Line  Changes 
For  Epson 


m  40  REn  ■*»i»aii!«ti-'M4»ianjii«i 

IB240  808UB  2240 

a  320  TRAP  9701  CLOSE  iNllDP 
EN  •N1,NB,N0, "Pl"i?  • 
N1|CHR*(27>|CHR«(6S} | 
CHRS<N7)iBEW  ■'Wi^HMff 

10  340  TRAP  970 

8F390  IF  CLF  THEN  FOR  C-N0 
TO  N2iF0R  I-N0  TO  N3l 
POKE  PABE6+N101-«-I,C«N 
12+I*N3iNEXT  IiBOSUB 
22S0 

IM360  DM-PEEK  (68)  ■«-N2S6«PECK 
(B9) iPA8S-Ne 

M370  FOR  Y-N0  TO  191-S0»CP 
TYPE-Nl)  STEP  3.3 

01460  X-U8R(ADR(ADD»}  ,  ADR(8 


RF4S) , ADR(BRF3« 

BRF2S) , ADR (QRFl 

0,PA88) 
01490    7    «N1|CHR«<27}  I 

R«<224) |CHR*<N1 

« 
M500    PABS>    NOT    PABSi 
10.310     IF    CLF    THEN     NEX 
IK  520    7    *NliCL08E    «N1 
KB  1160    7    *N6|"<4    SPAC 

lUij.MiLi  -rgsj"  I  ?  « 

{8    8PACES}F0R 
I "spson-typs   p 


) , ADR ( 
«) ,N46 

"K-lCH 
} I BRF4 

NEXT  Y 

T  C 


ES>| 
N6t  ■ 
I?  «N6 
r intar 


i:F14e0  POKE  N16,N16»N7iP0KE 
53774, PEEK(N16) I  RET 
URN 

» 1770  POKE  B2,Nli7  "{DOWN} 
Sat  Colors  to  Prlnti 
"l7  °0-niIMO  IxYELL 
OH  2-REDC5  BPACES}3 
■ORANBE' 

FE2230  REM  ■nsnoH^EianiiDi 

M 2240  BRAPHIC8  N63iB0SUB  1 
480IFQR  I-Nl  TO  N3iP 
OKE  N707+I, COLOUR (I) 
■NEXT  IiPOKE  N712,C0 
LOUR(N0> I  RETURN 

nt22S0  REM  ■ran;i:nTaM-*<.iti.i;>-M 

If  2260  POKE  N106,TOP-N32iBR 
APHICS  N2+N16i7  *N6i 
7  ttN6|'{4  aPACES}ALI 
ON  PAPERi "i7  «N6 

K 2270  7  #N6|"  LOAD  "jilF  C 
>N0  THEN  7  ttN6|«YELL 
ON"! IPOKE  N712,N24iP 
OKE  N70a,N16«N7 

H.  2280  IF  C-Nl  THEN  7  «N6|  " 
RED  "I  iPOKE  N712, 
N4B 

K2290  IF  C-N2  THEN  7  #N6|  " 
BLUE  -| iPOKE  N712,N 
16«N7 

Fl  2300  7  »N6|"  RIBBaN"i7  ttN 
6i?  ttN6| -<4  8PACE8>P 
RESa  RETURN" I  7  •N6| " 
{5  3PACES}MHEN  READY 

•I 

BI2310  POKE  764,N2S5lCL08E 
•NSlOPEN  «N9,N4,N0," 
Kl  " 

«  2320  BET  ttNS,KlIF  K015S 
THEN  2310 

H2330  POKE  N106,TaPiaaTa  2 
240 

EN  3920  DATA  This  scraan  dun 
p  progrsM  Is  sst  up, 
for  EPBON-typa  print 
ars. 

[^4180  DATA  You  Mill  nsad  t 
hraa  ribbons  for  a,c 
olor  print!  bluai  ya 
lIOMi  and  rad. 

n4190  DATA  Ths  scrssn  Mill 

proapt  you  for  ths, 

corrsct  ribbon  color 

014200  DATA  fB>nsTHirtiin:m 
{V},Bs  sura  to  saka 
an  'allgnasnt  aark', 
at  ths  top  of  ths  pa 
gs  bafora 

FA  4210  DATA  starting  a  colo 
r  print  (Align  papar 
t,Mark  laft  adga  Mit 
h  fina  pancil 

U4220  DATA  Mhara  it  crossa 
s  ths  taar-off  bar>. 
,  ,Pln-faad  papar  wl 
1 1  Mor k  bast. , \, 

N.4260  DATA  duap  choBsn  (rl 
bbon  and  papar 


Program  5:  Line  Changes 
For  Big  Blue  Printer 

»  40   REM   MiJII-MH-H-l'nilllMJr 

CC  320    TRAP    970 1  CLOSE    «NliOP 

EN    *N1,N8,N0, "Pi " 
n  340    TRAP    970 
M  360    DM-PEEK  (88) '«-N2S6*PEEK 

(B9> IPAS8-N0 
M 370    FOR    Y-N0    TO    191-30f(P 

TYPE«N1>     STEP    3.3 
CO  460    X-U8R(ADR<ADD*>  ,ADR(Q 

RF4« )  , ADR  <  8RF3«  > , ADR ( 

BRF2*  > , ADR  <  BRF It),  N48 

e.PASS) 
in  490  7  «N1)'*{4  SPACES}  "tCH 

R«(27)  I  '■K"|CHR«(224)  | 

CKR«<1 ) |BRF4«tCHR«(27 

> I  "A"iCHR*(7) 
AD  300     PASS-     NOT    PASSiNEXT     V 
nrS20     7     ttNliCLQSE     «N1 
EH630     POSITION    N2,N10  +  N10l7 
MNli-Aftsr    Loading    p 

rasB    E,    E,     or    CfV}" 
PH930     BET    SNS.KPiIF     KP077 

AND    KP056     AND    KP057 
THEN    9301  REM 

II333IB 


it  1160  7  WN6|  "<4  SPACES}! 

{6  SPACES}FOR   THE"  I 

7  «N6| "big  blus  prin 

tar" 
CF  14S0  POKE  N16,N16«N7tP0KE 
33774, PEEK(N16> IRET 

URN 
n.  3920  DATA  This  scrsan  dum 

p  prograa  is  sst  up, 

for  tha  Big  Blua  prl 

ntar . 
PH  4260  DATA  duAp  chossn  (tu 

rnad  on,  papar 

Program  6:  Line  Changes 
For  Star  NP- 10 

Fl  320  TRAP  9701  CLOSE  «NliOP 
EN  •Nl,Ne,N0, "Pi -17  • 
N1|CHR«(27) tCHR«(6S> | 

CHR«(Na)  I  REM  mtrrrum' 

0(1370    FOR    V-N0    TO    191-S0t(P 

TYPE"Nl)  STEP  N4 
m 490  DM-DM+N40 
Dl  900  NEXT  Y 

Dtii60  7  ttN6|"{4  wnnmrnaa^ 

iuy.Miii-rm"i7  «N6|  " 
ta  SPACE8}F0R'i?  •N6 
■"star  np-10  prlntar 
s" 

1(2260  7  fNl|CHR*(27)  |CHR*( 
12)|lPaKE  N106,TOP-N 
32i8RAPHIC8  N2-l-N16i7 
«N6l7  •N6i7  •N6 

eH3920  DATA  This  scraan  dua 
p  progran  la  sat  up, 
for  tha  atar  NP-10  p 
r intar. 

01  4200  REM  [EHM3i"»"'-l-M!'*'"r 

(M  4220  DATA  Pin-faad  papar 
Mill  Mork  bast.,\. 
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The  Pyramid  Game 


Ronald  Bobo 


Test  your  problem-solving  abilities 
with  this  intriguing  puzzle  for  the 
Amiga.  Careful  attention  to  detail  and 
great  graphics  make  this  game  an  im- 
pressive one.  522K  of  memory  and 
Workbench  1.2  are  required. 


"The  Pyramid  Game"  is  a  classic 
strategy  puzzle  that  demonstrates 
the  power  of  Amiga  Basic.  It's  a 
stacking  game  in  which  you  rear- 
range disks  on  a  stick,  attempting  to 
sort  them  by  size. 

I  wrote  the  first  version  of  The 
Pyramid  Game  in  C  for  an  IBM- 
compatible  computer.  Suprisingly, 
the  Amiga  Basic  version  is  nearly  as 
fast  as  the  original. 

The  Pyramid  Game  requires 
luck,  skill,  and  logic  for  the  best 
scores.  If  you're  a  programmer,  take 
a  close  look  at  the  Amiga  Basic 
listing.  You'll  learn  about  using 
fonts  in  BASIC  programs.  You'll 
also  learn  how  to  move  graphic  im- 
ages quickly. 

Typing  It  In 

The  Pyramid  Game  is  written  en- 
tirely in  Amiga  Basic,  Type  it  in  and 
save  it  to  disk. 

The  Pyramid  Game  requires 
two  system  files:  graphics, bmap 
and  diskfont.bmap.  You  can  find 
these  files  on  your  Extras  disk.  Use 
the  CLl  to  copy  them  from  the  Ex- 
tras disk  to  the  libs  directory  of  your 
Workbench  disk.  The  Pyramid 
Game  uses  several  system  fonts,  so 
be  sure  to  boot  up  with  a  Work- 
bench disk  that  has  all  the  fonts 
(the  Workbench  disk  that  came 
with  your  computer  should  work.) 


1! 

\ 

S5^                            tCiMtl'ait]  alU 

3 

^B 

?jrMii     tacb  tiw  ft  Irttar 

i        — 

btucL'c  tiTMt  iUt  ttirr  (d  Uir 
lop  AiU  ^  iDTcrV^    TIk 

frvlrr   m^trf  Mr4t«,  «.(  feller, 

A«xli><alaa 

I 

i 

In  this  game,  the  player  is  well  on  the 
way  to  solving  the  puzzle. 


To  run  The  Pyramid  Game, 
simply  double-click  on  its  icon  from 
the  Workbench.  AmigaBASlC  will 
load,  and  The  Pyramid  game  will 
start  automatically.  It  is  very  impor- 
tant to  start  the  program  by  double- 
clicking  on  it's  icon,  rather  than 
loading  Amiga  Basic  from  the  CLI, 
otherwise  you'll  get  an  "Out  of  heap 
space"  error  on  an  Amiga  with  512K 
of  memory.  Don't  try  to  run  other 
programs  at  the  same  time;  other- 
wise, you'll  get  the  same  error. 

Solving  The  Puzzle 

When  the  game  begins,  you'll  see  the 
title  screen.  Press  a  key  to  begin.  The 
Pyramid  Game  is  divided  into  two 
windows.  The  left  window  shows 
the  puzzle  itself.  The  right  window 
shows  the  status  of  the  game,  includ- 
ing how  many  moves  you've  made 
and  how  to  exit  the  game. 

The  puzzle  is  a  stack  of  16 
rectangluar  pieces,  each  a  different 
size.  The  pieces  are  scrambled  at 
the  beginning  of  the  game;  press  a 
key  to  stop  the  movement. 

Each  position  is  labeled  with  a 
letter  from  A  to  P.  When  a  corre- 


sponding key  is  pressed,  all  pieces 
from  that  letter  to  the  top  are  invert- 
ed. For  example,  if  you  press  the  D 
key,  the  piece  at  A  will  swap  places 
with  the  piece  at  D,  and  the  piece  at  B 
vrill  swap  places  with  the  piece  at  C. 

With  a  little  luck  and  some 
careful  thought,  you  should  be  able 
to  arrange  the  pieces  into  a  pyra- 
mid. When  you've  solved  the  puz- 
zle, a  window  labeled  "options" 
appears  on  the  screen.  This  window 
gives  you  a  short  menu.  You  can 
choose  X  to  exit  the  game,  R  to 
replay  the  same  game,  or  N  to  start 
a  new  one. 

The  R  option  is  useful  when 
you  want  to  try  to  better  your  previ- 
ous score  with  the  same  puzzle,  or 
when  you're  competing  with  a 
friend.  Use  the  N  option  for  a  new 
configuration  of  the  puzzle  pieces. 

Incidentally,  you  should  not 
exit  from  the  game  with  the  Amiga 
Basic  Quit  menu  option,  or  with 
Control-C.  If  you  do,  the  custom 
screen  used  by  The  Pyramid  Game 
remains  open,  and  thus  uses  valu- 
able memory. 

About  The  Program 

The  Amiga  Basic  GET  and  PUT 
statements  use  the  powerful  Amiga 
hardware  to  move  image  blocks,  so 
they're  very  fast.  The  16  puzzle 
pieces  are  first  drawn  on  the  screen 
with  line  commands,  and  then 
stored  in  a  two-dimensional  array 
with  the  GET  command.  Another 
array  is  used  to  keep  track  of  the 
position  of  the  pieces  as  they  are 
shuffled  and  then  moved. 

The  Pyramid  Game  also  dem- 
onstrates how  to  use  disk-based 
fonts  in  Amiga  Basic, 
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The  Pyramid  Game 

For  instructions  on  ontering  this  proaram,  piease  refer  to  "COMPUTEI's 
Guia©  to  Typing  In  Programs"  elsewhere  in  this  issue. 


REM         — =<   PYRAMID  Game 
pyright  c   1988* 


BASIC  Version  Co 


DEFLMG  a-w< 

REM  — s,<  DECLftRE  FUNCTIONS  AND  NAME  LIBRARIES  US 

ED  IN  PROGRAM* 

* 

LIBRARY  "graphics,  library"-* 

LIBRARY  "diskfont, library"* 

DECLARE  FUNCTION  OpenFont ( )  LIBRARY* 

DECLARE  FUNCTION  OpenDiakFont ( )  LIBRARY* 

* 

Fonts-" " : height 1=0 : DIM  Font ( 5 ) * 

CALL  SetapFonts( Font?, height%, Font ( ) )* 

DEFSSG  barray.terap* 

Bsize=!l40* 

DIM  barraylBsize, 15) , temp%, HoLder%( 15 ) , Backup%( 1 

5),Work%{15)* 

FOR  Count%=0  TO  15:HoLder%(Count%)=Count%:NEXT* 

RANDOMIZE  TIMER* 

* 

REM  — =<  CREATE  CUSTOM  SCREEN  AND  V'/INDOW* 

* 

SCREEN  1,640,200,3,2* 

IF  TDispLay  =  1  GOTO  Game* 

WINDOW  2, "The  Pyramid  Game  -   COMPUTEl  Publicati 

ons,  Inc. " , , 22, 1* 

* 

REM  — =<  INITIALIZE  VARIABLES* 

* 

Under5=STRINGS ( 50 , 176 ) * 

* 

REM  — =<  SET  UP  COLORS* 

* 

PALETTE  4, .47,. 87,1* 

PALETTE  5,. 99, 0,0   'Fire  engine  red* 

PALETTE  6,1,. 85,. 13  " YeLLOW* 

PALETTE  7 , . 3  3 , . 87 , 0* 

4 

IF  TDispLay  =  1  GOTO  Game* 

REM  ::  -=<  DISPLAY  TITLE  SCREES:* 

* 

attr=l* 

CALL  SetFont  (WINDOW(B) , Font (1 ) ) * 

CALL  SetSoftStyLe  (WIND0W(8) , attr , 255 )* 

COLOR  5,2:CLS« 

LOCATE  3,13* 

CALL  PrLine  ("P  Y  R  A  M  I  D")* 

CALL  SetFont  (WIND0W(8) , Font(2) )* 

attr=2* 

CALL  SetSoftStyLe  (WINDOW(a) , attr, 255)* 

COLOR  1 , 2* 

LOCATE  10,15* 

CALL  PrLine ("A  Game  of  Skill  and  Luck")* 

attr=0* 

CALL  SetSoftStyLe  ( WINDOW( 8 > , attr , 255 ) * 

LOCATE  12  9* 

CALL  SetFont  (WINDOW(a) ,Font( 3) )   * 

COLOR  6,2* 

CALL  PrLine  ("COMPUTEl  Publications,  Inc.   Copyr 

ight  1988")* 

LOCATE  15,12* 

COLOR  5,2* 

CALL  PrLine  ("All   Rights   Reserved")* 

CALL  SetFont  ( WINDOW( 8) , Font (0 ) ) * 

COLOR  7,2* 

CenterString  14,  UnderS* 

CenterString  20,  Under$* 

COLOR  4,2* 

CenterString  22, "Press  any  key..."* 

a?=INPUTS(l)* 

WINDOW  CLOSE  2* 

* 

Game:* 

y=110:xl=320:yl=120* 

x=310* 

WINDOW  3, , (0,0)-(340,186),16,l* 

COLOR  6, 2:CLS* 

WINDOW  4, "Pyramid" , { 340,0)- (630,  186) ,16, 1* 

PALETTE  5,. 99, 0,0   'Fire  engine  red* 


PALETTE  6,1,. 85,. 13  'YeLLow* 

COLOR  6, 5* 

CLS* 

WINDOW  OUTPUT  3* 

COLOR  6, 2* 

4 

REM  — =<  PRINT  LETTERS  ON  LEFT  SIDE  OF  WINDOW  3* 

CALL  SetFont  ( WINDOW( 8) , Font ( 4 ) ) * 

CALL  SetSoftStyLe  (WIND0H{8) , attr , 255 ) 4 

LOCATE  1,1* 

FOR  x=l  TO  15* 

PRINT  CHR5(x+64 )+"."* 
NEXT* 

PRINT  "P.";* 
* 

REM  — -<    GENERATE  GAME  BLOCKS* 
LINE (162, 6)- (164, 181), 5, bf* 
w=l 5  5 : x=l ! y=l 70 ; E=6 : CO=0* 
FOR  Count%=0  TO  15* 

LINE(w,x)-(y,a) ,co,bf* 

co=co+l:IF  co=2  THEN  co=co+l* 

IF  co=a  THEN  co=a* 

w=w-7 :y=y+7 !X=x+12: z=z+12* 
NEXT* 

w=36 : x=l ! y=27  S : 2=6* 
* 

REM  — =<  AND  STORE  IN  ARRAY  barrayO* 
FOR  Count%=0  TO  15* 

GET(w,x)-(y,z), bar ray  C  0 , Count* } * 

x=x+12:z=z+12* 
NEXT* 
* 

REM  — =<  PRINT  INSTRUCTIONS  IN  WINDOW  4* 
WINDOW  OUTPUT  4* 
attr=14 

CALL  SetFont  {WIND0W(8) , Font( 1 ) )* 
CALL  SetSoftStyLe  (WIND0W{8) , attr , 255)* 
COLOR  6,5 :CLS* 
LOCATE  1,6* 

CALL  PrLine  ("PYRAMID")* 
attr=04 

CALL  SetFont  ( WINDOW ( 8 ), Font ( 0 )) * 
CALL  SetSoftStyLe  (WINDOW{8) , attr , 255)* 
COLOR  1,0* 

CALL  CenterString(4, "  A  Game  of  Skill  and  Luck  " 
)* 

LOCATE  6,1* 

CALL  SetFont  (WIND0W(8) , Font{ 2) )* 
CALL  SetSoftStyLe  (WINDOW( 8) , attr , 255 ) * 
COLOR  6,5* 

CALL  PrLine ("Rearrange  the  blocks  to  form  a")< 
CALL  PrLine( "pyramid.   Each  time  a  letter")* 
CALL  PrLine("from  B  to  P  is  typed,  all  the")* 
CALL  PrLine ( "blocks  from  that  letter  to  the")* 
CALL  PrLine {"top  will  be  inverted.   The")* 
CALL  PrLine( "fewer  moves  needed,  the  better.")* 
LOCATE  13,5* 

CALL  PrLine("Low  Score  Wins!")* 
FOR  Count»=l  TO  5000:NEXT* 
* 

REM  — =<  GET  INTO  ACTUAL  GAME* 
NewGame:* 

CALL  SetFont  (WINDOW(a) , Font{0) )* 
CALL  SetSoftStyLe  (WINDOW( 8 ) , 2, 255 )* 
COLOR  1,0* 
CALL  CenterString( 15, "  press  any  Key  to  Begin  ") 

4 

WINDOW  OUTPUT  3* 

* 

REM  — =<  SHUFFLE  BLOCKS* 

WHILE  INKEYS=""* 

FOR  Low%=0  TO  15* 

rnum=INT(RND*15)  MOD  { 15-Low*+l)+Low%* 

terap*=HoLder % ( rnum) * 

HoLder% ( rnum) =HoLder% ( Low* ) * 

HoLder* ( Low* ) =temp** 
NEXT  * 

w=36:x=l:y=275!Z=64 
FOR  LOW*=0  TO  15* 

PUT(w,x) ,barray(0,HoLder*(Low») ) ,PSET* 

x=x+12* 
NEXT   * 
WEND* 
* 
REM  — =<  COPY  BLOCK  POSITIONS  TO  BACKUP  ARRAY  (F 
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OR  REPLAYING  GAME)* 

PRINT  bt* 

FOR  Countl=0  TO  15  :feac)cup%  (Count!  )=HoLderl(  Count 

IF  b%=0  THEN  Choose* 

%} :NEXT< 

REM  LOCATE  15,1* 

4 

REM  CALL  CLearScreen(WINDOW(e))* 

StartPLay:-* 

WINDOW  CLOSE  5* 

4 

ON  b%  GOTO  BaiLout, RepLay,SetWin* 

REM  — =<  PUT  MOVE  COUNTER  ON  SCREEN^ 

* 

WINDOW  5,"Moves",(430,150)~(540,168)  ,16,l-« 

BaiLout:* 

* 

WINDOW  CLOSE  3* 

attr=0-t 

WINDOW  CLOSE  4* 

CALL  SetPont  (W1ND0W(8) , Font (5) )* 

COLOR  1,0* 

CALL  SetSoftStyLe  (WINDOW( 8) , attr, 255 ) ♦ 

GOTO  Quit* 

COLOR  6,2* 

'4 

CLS* 

RepLay ; * 

WISDOW  OUTPUT  4t 

FOR  Count%=0  TO  15* 

CALL  SetFont  (WIND0W(8) , Font (2) )* 

HoLder* ( Count% )=Backup% ( Count* ) * 

CALL  SetSoftStyLe  (WINDOW(a)  ,attr,  255  )■« 

NEXT* 

COLOR  6,5-« 

CALL  SetFont  ( WINDOW( 8) , Font ( 0) ) * 

LOCATE  23,4* 

CALL  SetSoftStyLe  (WINDOW(a) , 2, 255 )* 

CALL  PrMsgC'Type  "+CHR5  (  32)  +  "X"+CHRS  (  32  )+"to  Abo 

COLOR  1,0* 

rt  Game")* 

WINDOW  OUTPUT  3* 

* 

GOTO  StartPLay* 

REM  — =<  HOVE  ROUTINE* 

SetWint* 

WINDOW  OUTPUT  3   * 

WINDOW  OUTPUT  4* 

CALL  DispLay(HoLder%( ))* 

GOTO  NewGame* 

Move%=0 ! x%=0 : FLagt=0 : Score%=0* 

* 

Move:* 

REM  — =<  END  GAME* 

a$=INKEY$;IF  aS=""  THEN  GOTO  Move* 

* 

IF  UCASES(aS)="X"  THEN  GOTO  BaiLout* 

Quit:* 

Move%=ASC( UCASE$ { a? ) ) -65 : x%=Move%* 

CLS* 

IP  (Move!  <  1  OR  Hove%  >  16)  THEN  GOTO  Hove* 

FOR  i%-0  TO  4* 

FOR  Counter%=i0  TO  Move%* 

CLoseFont  Font(i)* 

Work! ( Counter % )=HoLder% ( x% ) : x%=x%- 1* 

NEXT* 

NEXT  * 

SCREEN  CLOSE  1* 

FOR  Counter%=0  TO  Hove%* 

END* 

HoLderl (Counter* ) =WorX% ( Counter % ) * 

* 

NEXT  < 

SUB  DispLay(HoLder%())  STATIC  * 

CALL  Di3pLay(HoLder%( ) )♦ 

SHARED  barray( )* 

Score%=Score%+I : GC?=STRS ( Score% )* 

w=36 !X=1 :y=27  5 :z=6* 

WINDOW  OUTPUT  5: COLOR  7,2* 

FOR  Count%=0  TO  15* 

CLS* 

PUT  (w, x) ,barray(0,HoLder%( Count*) ) ,PSET* 

LOCATE  1 ,  3* 

x=x+12* 

CALL  PrMsg(SCS)* 

NEXT* 

WINDOW  OUTPUT  3* 

* 

REM  — =<  CHECK  IF  GAME  OVER* 

END  SUB* 

SUB  SetUpFont9(Font5.height%,Font() )  STATIC* 

FOR  Counter%=l  TO  15* 

FOR  i=0  TO  5* 

IF  HoLder%(Counter%)  >  HoLder%(Counter%-l)  THE 

READ  Font?, height** 

N* 

CALL  GetFont  ( Font? , height* , Font ( i )) * 

FLag%=l* 

NEXT* 

ELSE* 

END  SUB* 

FLag%=0* 

4 

END  IF* 

DATA  topaz. font,S,emeraLd. font, 20, ruby. font, 8 

,ga 

IF  FLag%=0  THEN* 

rnet. font ,9, diamond . font, 12, diamond. font, 20* 

Counterl=16* 

* 

GOTO  Move* 

'  Opens  fonts  in  RAM  or  on  disk* 

END  IF* 

'  handLe  is  the  designator  for  the  various  fonts   | 

NEXT  Counter** 

4 

* 

SUB  GetFont (fontname$, height*, handLe)  STATIC* 

REM  — =<  GAME  OVER* 

TextAttrS.  ( 0)  =SADD (  f ontname5+CHR?  ( 0 ) )  * 

WINDOW  CLOSE  5* 

TextAttrS!(l)=65536S(*height%* 

REM  WINDOW  OUTPUT  4* 

IF  fontname5="topaz.font"  THEN* 

REM  LOCATE  15,1* 

handLe=OpenFont ( VARPTR( Tex tAttr & ( 0 ) ) ) * 

REM  CALL  CLearScreen(WINDOW(8))* 

ELSE* 

REM  LOCATE  15,7* 

handLe=OpenDiskFont(VARPTR(TextAttr&{0) ) )* 

* 

END  IF* 

REM  — =<  PUT  OPTIONS  MENU  WINDOW  ON  SCREEN* 

END  sua* 

WINDOW  5 , "Options " , ( 340 , 93 ) - ( 630 , 186 ) , 1 6, 1* 

* 

CALL  SetFont  (WINDOW(S) , Font(2) )* 

SUB  PrLine(rasgS)  STATIC* 

CALL  SetSoftStyLe  (WINDOW( 8) , attr , 255 ) * 

CALL  PrMsg  (msg?): PRINT  * 

COLOR  2, 6: CLS* 

END  SUB* 

LOCATE  2,7* 

4 

PrMsg(SC?+"  Moves")* 

SUB  PrMsg (msg$)  STATIC* 

LOCATE  4,3* 

CALL  Text  ( WINDOW( 8 ) ,  SADDdnsg? )  ,LEN(niag$ )  )* 

PrM3a("X  Exit")* 

END  SUB* 

LOCATE  6,3* 

* 

PrMsg("R Replay  Game")* 

REM:  Center  text  on  screen* 

LOCATE  8,3* 

4 

PrMsg ( " N  New  Game" ) * 

SUB  CenterStringCrow%,a$)  STATIC* 

-4 

Center=WINDOW( 2)/7.9/2* 

CTiOOse;* 

LOCATE  row%,Center-(LEN(a$)/2)* 

a5=INKEY$:IF  aS=""  THEN  Choose  ELSE  a$=UCASES(aS 

PrLine  a?* 

)* 

END  SUB* 

b%=INSTR("XRN",aS)* 

4 
* 

© 
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Tokenized 

And 

Untokenized 

Disk  Files 

A  Tutorial 

Eugene  Koh 


If  you're  a  programmer,  it's  important 
to  understarjd  the  two  different  meth- 
ods that  Atari  BASIC  uses  to  store 
disk  files.  The  tutorial  ends  with  a 
clever  program  that  autoruns  files 
saved  with  the  LIST  command.  For 
the  Atari  400,  800,  XL,  and  XE  with 
disk  drive. 


The  Atari  Input/Output  (I/O)  sys- 
tem is  versatile.  You  can  store  any 
information  to  any  device.  For  in- 
stance, you  can  send  a  program  or 
data  to  a  printer,  modem,  disk 
drive,  cassette  drive,  or  any  other 
device  that  you  may  have  connect- 
ed to  your  system. 

In  BASIC,  LIST  is  the  com- 
mand you  use  to  send  your  pro- 
gram. You  can  send  it  to  your  disk 
drive  with  LIST"D:FILE.BAS",  to 
DOS  2.5's  ramdisk  with  LIST"D8: 
FILE.BAS",  to  a  printer  with 
LIST"?:",  or  to  cassette  with 
LIST"C:". 

The  LIST  command's  mirror 
image  is  ENTER.  This  command  is 
used  to  enter  a  program  from  any 
device.  An  example  is  ENTER"D: 
FILE.BAS".  Keep  in  mind  that 
ENTER  does  not  clear  memory 
before  bringing  in  the  program,  so 
it's  a  good  idea  to  type  NEW  before 
using  the  ENTER  command  (unless 
you  want  to  merge  two  programs). 


SAVE  And  LOAD 

LIST  and  ENTER  work  with  straight 
ASCII  text.  For  this  reason,  you  can 
use  LIST  to  save  a  program  to  disk, 
use  a  word  processor  to  edit  it,  and 
then  use  ENTER  to  load  the  pro- 
gram back  into  memory. 

The  problem  with  this  approach 
is  that  LIST  and  ENTER  are  very 
slow.  Atari  BASIC  tokenizes  pro- 
grams. For  instance,  the  PRINT  com- 
mand is  saved  as  a  single  byte.  LIST 
and  ENTER  must  translate  between 
ASCII  and  tokenized  programs. 

Tokenization  is  designed  to 
save  memory  and  time.  Two  com- 
mands— SAVE  and  LOAD — work 
with  tokenized  programs  only. 
SAVE"D:FILE.BAS"  is  similar  to 
LIST"D:FILE.BAS",  and  LOAD"D; 
FILE.BAS"  is  similar  to  ENTER"D: 
FILE.BAS".  When  you  use  SAVE 
and  LOAD,  you'll  notice  that 
they're  much  faster  than  LIST  and 
ENTER.  If  you  get  a  directory, 
you'll  also  notice  that  most  LISTed 
programs  are  larger  than  their 
SAVEd  counterparts. 

Because  SAVE  and  LOAD 
work  with  tokenized  programs, 
they  are  normally  used  only  for 
disk  files  (CSAVE  and  CLOAD  are 
used  for  cassette). 

Autorunning 

Normally,  you  must  type  RUN  to 
start  a  BASIC  program.  However, 


you  can  use  RUN"D:FILE.BAS"  to 
load  and  run  a  program.  RUN  used 
with  this  syntax  works  only  with 
tokenized  files  (those  saved  with 
the  SAVE  command). 

The  accompanying  program  can 
be  used  to  make  LISTed  files  auto- 
run.  Type  it  in  and  save  it  to  disk 
with  the  name  "AMAKER.BAS". 

When  you're  ready  to  make  a 
file  autorun,  load  and  run  AMAKER 
.BAS.  You'll  be  asked  for  the  file- 
name of  the  program  you  want  to 
alter.  Make  sure  that  this  program  is 
indeed  a  LISTed  BASIC  program. 
AMAKER  will  append  several  bytes 
to  the  end  of  the  file  that  will  make 
it  autorun  when  entered.  (The  bytes 
are  82,  85,  78,  155.  These  are  the 
ASCII  values  for  RUN,  followed  by 
a  RETURN.  When  the  file  is  entered, 
the  RUN  command  will  be  treated  as 
a  direct-mode  command.) 

When  you're  ready  to  try  the 
new  autorun  file,  type  NEW  and 
then  ENTER"D:filename".  The 
program  should  load  and  run. 

AMAKER 

For  instructions  on  entering  Ihis  program, 
please  refer  to  "COMPUTEl's  Guide  to  Typing 
In  Programs"  elsewhere  in  this  issue. 

KB    REM  AUTORUN  UNTOKENIZED 

FILES 
EH  1  REM  COPYRIGHT  19BB  CQMP 

UTE!  PUBL. 
U2  REM  ALL  RIGHTS  RESERVED 
IC  100  BRAPHICS  0:PaKE  710,1 

7BIP0KE  712,17aiTRAP 

210 
n  110  DIM  A«(20)  ,B« (20)  iPOK 

E  69,3 
IJ  120  PRINT  IPRINT  "  tCLEAR> 

{4  SPACES>AUTORUN  UNT 

OKENIZED    FILES" 
CD  130    7    "Copyrigtit     IVSS    COM 

PUTE!  PubliCAtiona  "I 

7  "C7    SPACES>A11  Rtgh 

tm  R««»rv»d"iPRINT 
M  140  7  "Entvr  work  filanan 

■■"■INPUT  ttl6iB«lIF  B 

•-""  THEN  RUN 
IH  190  A«-"Dt  "lAtCS) -BkiPRIN 

T 
M 160  7  "Prm»m    any  kay  to  b 

■gin  procadurB. . .  "|i 

POKE  764,299 
111170  ON  PEEK(764>-295  GOTO 

170tPOKE  764,299 
K 180  ?  CHR«(196> I " 

C10  SPACES}-*-  WORKINB 

!  -»-"i7  lOPEN  #1,"?,0 

,A« 
K190    FOR    JNK-0    TO    SlRCAD    B 

VTElPUT  •l,BYTEiNEXT 

JNK 
FF200  CLOSE  til?  ■' 

{8  8PACES>-«-  ALL  FIN 

I8HED    -«-"lEND 
IWZi0     ?     I?     i7     "ERROR    •     "  |  PE 

EK(195) J " ! "|CHR»<2g3) 

t  END 
Bt  300    DATA    82,69,78,199  ® 
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Movable  Feasts: 
Calculating  Easter 


Jim  Butterfield,  Contributing  Editor 


Planning  a  Mardi  Gras  celebration  for 
the  year  2000?  You'll  need  this  pro- 
gram, which  finds  the  dates  for  those 
spring  holidays  that  fall  on  different 
days  each  year.  Although  the  program 
is  written  in  Amiga  Basic,  it  may  be 
easily  translated  to  other  BASlCs. 


From  the  Book  of  Common  Prayer, 
Church  of  England,  1910: 

To  find  the  Golden 
Number,  of  Prime,  add 
One  to  the  Year  of  our 
Lord,  and  then  divide  by 
19;  the  Remainder,  if  any, 
is  the  Golden  Number;  but 
if  nothing  remaineth,  then 
19  is  the  Golden  Number. 

To  find  the  Dominical 
or  Sunday  Letter,  accord- 
ing to  the  Calendar,  until 
the  Year  2099  inclusive, 
add  to  the  Year  of  our  Lord 
its  Fourth  Part,  omitting 
Fractions,  and  also  the 
Number  6:  Divide  the  Sum 
by  7;  and  if  there  is  no  Re- 
mainder, then  A  is  the  Do- 
minical Letter;  But  if  any 
Number  remaineth,  then 
the  Letter  standing  against 
that  Number  in  the  small 
annexed  Table,  is  the  Do- 
minical Letter. . . . 


When  I  read  this,  I  have  an  im- 
age of  missionaries  in  far  lands,  out 
of  touch  with  the  mainstream  of  civi- 
lization, turning  to  their  prayer  books 
and  carefully  working  through  the 
dates  of  the  sacred  holidays.  As  they 
looked  at  the  procedures  and  tables, 
they  may  have  wondered  just  how 
far  ahead  the  Church  planned — 
amazingly,  the  complete  set  of  tables 
extends  to  the  year  8500. 

The  method  of  calculation  is 
well  spelled  out  and  involves  sever- 
al alternative  methods.  The  program 
accompanying  this  article  is  good  for 
the  years  from  1900  to  2099. 

Finding  Easter 

Easter  is  often  thought  of  as  the  first 
Sunday  following  the  first  full 
moon  after  the  spring  equinox.  Ac- 
tually, it's  somewhat  more  complex 
than  that.  Fortunately,  the  calcula- 
tion of  Easter's  date  has  been  stan- 
dardized for  so  long  that  there  is 
little  danger  of  confusion. 

Several  other  dates  depend  on 
Easter.  Shrove  Tuesday  (also 
known  as  Pancake  Tuesday,  Fat 
Tuesday,  or  Mardi  Gras)  is  the  last 
day  before  Lent.  The  first  day  of 
Lent  is  known  as  Ash  Wednesday. 
Good  Friday  is  two  days  before 
Easter  Sunday.  Seven  weeks  after 
Easter  is  a  lesser-known  event 
called  Whitsunday,  or  Pentecost.  It 


seems  that  it  doesn't  get  too  much 
attention  in  England  these  days, 
but  I  did  discover  that  every  year 
near  this  date,  the  gypsies  in  Britain 
head  for  a  gathering  at  Appleby 
Bridge  in  northern  England.  They 
still  do  this,  with  caravans,  ponies, 
and  all  the  trappings. 

If  you  wish  to  compare  the  pro- 
gram (1  used  Amiga  Basic,  but  you 
shouldn't  have  much  trouble  con- 
verting the  program  to  other  related 
dialects)  to  the  formal  description, 
you'll  find  that  the  variable  G  is 
used  as  the  Golden  Number,  and 
the  variable  D  is  the  Dominical 
Letter  (actually  a  number  from  0  to 
6  rather  than  a  letter  from  A  to  G). 

The  program  uses  the  MOD 
operator  to  calculate  remainders. 
However,  there's  an  oddity  to  the 
MOD  function  that  must  be  al- 
lowed for;  It  doesn't  give  the  correct 
answer  if  the  number  is  negative. 
For  example,  Amiga  Basic  says  that 
—  12  mod  7  is  —12.  If  you  examine 
the  code,  you'll  see  that  1  add  700  to 
the  number  to  ensure  that  it's  posi- 
tive. (Editor's  note:  The  latest  version 
of  Amiga  Basic  returns  the  correct 
answer  —11  mod  7  =  —5.) 

You  can  use  this  program  as  it 
stands  to  find  Easter  for  any  given 
year.  If  you're  ambitious,  you  can 
incorporate  it  into  your  own  calen- 
dar program. 
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Jim  Butterfield"* 


Movable  Feasts 

For  instructions  on  entering  this  program,  piease  refer  to  "COMPUTE!'s 
Suide  to  Typing  in  Programs"  elsewhere  in  this  Issue. 

Copyright  1988  -* 

■  COMPUTE  1  Publications,  Inc.* 

■  All  Rights  Reserved.* 
DIM  g{18)  ,m(6,2)-« 
PRINT  "Movable  Feast  Dates 
PRINT-* 

DATA  86,104,93,82,101,90,108,98* 
DATA  87,106,95,84,103,92,81,100* 
DATA  89,107,97* 
DATA  0,31,59,90,120,151* 
FOR  9=0  TO  18* 

READ  g(g)* 
t=t+g(g)* 
NEXT  g« 
FOR  j=l  TO  6* 
READ  X* 
t=t+x* 

m(  j,0)=x:ni(  j  ,  1  )=x« 
IF  j>2  THEN  m(  j.l)=''+l* 
NEXT  j* 

IF  to 2254  THEN  PRINT  "Error  in  DATA" s STOP* 
niS=" .  .  JanFebHarAprMayJun"* 
INPUT  "Year  (0  =  Quit)";y* 
WHILE  y<>0« 
IF  y<1900  OR  y>2099  THEN* 

PRINT  "Year  must  be  from  1900  to  2099"* 
ELSE* 
GOSUB  FindEaster* 

v=e-47:PRINT  "Shrove  Tuesday:  ";* 
GOSUB  PrintDate* 

v=e-46 SPRINT  "Ash  Wednesdays   ";* 
GOSUB  PrintDate* 
v=e-2: PRINT  "Good  Fridays 
GOSUB  PrintDate* 
v=e:PRINT  "Easter  Sundays 
GOSUB  PrintDate* 


v=e+49: PRINT  "Whitsunday:      ";* 
GOSUB  PrintDate* 
END  IF* 

INPUT  "Year  (0  =  Quit)"?y* 
WEND* 
END* 
4 

FindEaster:* 
LeapYear=0:IF  y=4*INT(y/4)  THEN  LeapYear=l* 
g0=y+l* 
g=g0  MOD  19* 
d0=y+INT ( y/4 ) +5* 
d=6  -  d0  MOD  7* 

P=g(g)* 

pl=(700+d-p)  MOD  7+1* 

e=p+pl+LeapYear* 
RETURN* 
* 
PrintDate!* 

m=6* 

WHILE  v<=m(m,LeapYear)* 
in=in- 1  * 

WEND* 

PRINT   HID${m?,3*m,3)  ;v-ra(ni,LeapYear)* 
RETURN   *  ' 


f  * 
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MOST  COMPLETE 

AMIGA 

RESOURCE 

EVER! 

COMPUTEI's  AMIGA  BUYER'S  GUIDE 

Everything  you  need  to  know  about  AMIGA  hardware  and  software— in  a 
single  volume!  Hundreds  of  hardware  and  software  listings— video  and 
audio  digitizers,  disk  drives,  RAM  expanders,  joysticks,  and  more— plus, 
the  most  comprehensive  AMIGA  software  encyclopedia  ever.  All  in 
COMPUTEI's  unique  easy-to-read  format. 


ON  SALE  APRIL  5  J98a 


SPECIAL  PREPUBLICATION  OFFER  FOR  COMPUTE!  READERS 


I  YES!  Please  reserve  . 


.  copies  o1  COMPUTEI's  1983  AMIGA  BUYER'S         Send  your  check  or  money  order  only — no  charges  on  this  special  offer— to: 


GUIDE.  I  enclose  S3.95  plus  $1.00  postage  and  handling  (S4.95  total)  for  each  copy. 


TOTAL  ENCLOSED  . 
NAME  


(please  print) 


ADDRESS . 

crrY 


.ZIP. 


COMPUTEI's  Amiga  Buyer's  Guide 
Single  Copy  Sales 
FDR  Station  Box  5038 
New  York,  NY  10150 

COMPUTEI's  Amiga  Buyer's  Guide  will  be  sent  to  you  shortly  after  publiraton. 


Credit  Scroll 
For  The  64 


Give  your  home  VCR  movies  a  profes- 
sional touch  with  this  program  for 
Commodore  64  and  VCR  owners. 
With  it,  your  movies  can  display  a 
scrolling  screen  of  credits  that  you 
create  and  design. 


Many  people  enjoy  making  home 
movies  with  a  video  camera  and 
showing  them  to  their  friends  and 
family  on  their  VCR.  With  "Credit 
Scroll,"  you  can  add  professional- 
looking  scrolling  credits  to  any 
home  movie.  Credit  Scroll  lets  you 
enter  lines  of  text,  keyboard  graph- 
ics, center  text,  and  create  scrolls  up 
to  2000  lines  long. 

Getting  Started 

Credit  Scroll  is  written  entirely  in 
BASIC.  Type  it  in  and  save  a  copy 
to  disk.  Before  you  can  use  the  pro- 
gram with  your  VCR,  however,  you 
need  to  make  some  connections. 

Connecting  your  64  to  a  VCR  is 
easy.  The  only  additional  piece  of 
hardware  you'll  need  is  a  Y-connec- 
tor  with  three  RCA  plugs — two  fe- 
male going  to  one  male.  Using 
Commodore's  standard  three-jack 
video  cable,  plug  the  chroma  and 
luma  (or  video)  connectors  from  the 
monitor  end  of  the  cable  into  the 
female  ends  of  the  Y-connector. 
Next,  plug  the  video  cable's  re- 
maining male  plug  into  the  VCR's 
audio  dubbing  jack,  and  plug  the  Y- 
connector's  male  plug  into  the  vid- 
eo dubbing  jack.  These  jacks  will 
usually  be  on  the  front  panel  of 
your  VCR,  though  some  VCRs  may 


Kenny  Lawson 


have  them  on  the  rear.  Now  the 
VCR  is  ready  to  tape  the  output 
from  your  64. 

You  should  be  able  to  see  your 
computer's  screen  output  on  the  TV 
connected  to  your  VCR.  If  you 
can't,  it's  possible  to  create  your 
credits  with  your  computer  con- 
nected to  your  usual  monitor  and 
then  connect  it  to  the  VCR  to  record 
the  credits  (explained  below). 
You'll  have  to  experiment  to  find 
the  solution  that  works  best  with 
your  equipment. 

Roll  The  Credits 

Now,  simply  load  Credit  Scroll  and 
type  RUN.  The  screen  prompts  will 
explain  how  the  program  works.  All 
you  need  to  do  is  enter  a  line  of  less 
than  40  characters.  If  you  enter  more 
than  40  characters,  the  program  re- 
minds you.  To  enter  blank  lines,  just 
press  RETURN  at  the  prompt. 

After  you've  entered  all  of  your 
text,  type  END  at  the  prompt  and 
press  RETURN.  The  screen  will  tell 
you  to  press  any  key,  and  you'll 
have  about  three  seconds  before 
the  actual  scrolling  begins.  Before 
you  press  the  key  to  start  the  scroll- 
ing, be  sure  your  VCR  is  set  up  to 
record  and  is  properly  connected  to 
your  64. 

Program  Notes 

The  machine  language  portion  of 
Credit  Scroll — contained  in  the 
DATA  statements — uses  the  64's 
vertical  fine-scrolling  register  at  lo- 
cation 53265  to  move  the  lines  of 
text  upward  vertically  by  one  row 
of  pixels  at  a  time.  Once  the  register 


is  at  the  minimum  value,  the  pro- 
gram uses  a  variation  of  the  tech- 
nique called  double  buffering — 
relocating  the  active  screen  memory 
while  the  scrolling  register  is  reset — 
to  give  flicker-free  text  movement. 
If  you  want  to  create  scrolls 
longer  than  the  current  limit  of  2000 
lines,  you  can  make  one  small  ad- 
justment to  the  program:  Simply  in- 
crease the  number  in  the  DIM 
statement  in  line  60  to  the  number 
of  lines  you'd  like  to  be  able  to  use. 

Credit  Scroll 

For  instructions  on  entering  this  program, 
pleose  refer  to  "COMPUTEI's  Guide  to  Typing 
In  Programs"  elsewhere  in  this  issue, 

FK  10  REM  COPYRIGHT  1988  COMPU 
TE!  PUBLICATIONS,  INC.  fl 
LL  RIGHTS  RESERVED. 
SR  20  PRINT" {CLRlCOPYRIGHT  198 
8":PRINT"C0HPUTE1  PUBLIC 
ATIONS,  INC." 
AQ  30  PRINT"ALL  RIGHTS  RESERVE 

D." 
BK  60  DIM  LI$(2000) 
HS  70  FORX=828T0918:READA:PDKE 

X,A:CT=CT+A:NEXT 
BJ  80  IFCT011693THENPRINTCHR5 
(147) "ERROR  IN  DATA  STAT 
EMENTS!":END 
SE  90  POKE53281,0:POKE53280,0: 

PRINTCHRS (147) 
EK  100  INPUT"CHOOSE  A  CHARACTE 

R  COLOR  (1-15) ";CC 
SP  110  IFCCOINT  (CC)THENPRINTC 
HR5 (145)CHRS (145) :G0T09 
0 
QP  120  IFCC<10RCC>15THENPRINTC 
HR$  (145)CHR$ (145) :G0T09 
0 
EP  130  PRINT: PRINT"DO  YOU  WISH 
CENTERING?  {Y/N)";:INP 
UTC$ 
PR  140  P0KE646,CC:PRINT: PRINT" 
NOW  YOU  CAN  ENTER  THE  L 
INES  THAT  YOU" 
AF  150  PRINT"WANT  TO  SCROLL  UP 
THE  SCREEN." 
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QJ 

160 

BA 

170 

JD 

180 

EC 

190 

QK 

200 

EH 

210 

BG 

220 

PK 

230 

EK 

240 

CB 

250 

EK  260 


EG  270 


FJ  280 


SE 

290 

ss 

300 

KD 

310 

FF 

320 

CQ  330 


PQ  340 

GE  350 
RE  360 


CR  370 


SM  3E 


PRINT:PRINT"IF  YOU  WISH 
A  BLANK  LINE  (OR  LINES 
)" 

PRINT" IN  BETWEEN  THE  CH 
ARACTER  LINES,": PRINT"J 
UST  HIT  <RETURN>  ALONE 
(SPACElAT" 

PRINT"THE  PROMPT,  ONCE 
{SPACE}FOR  EACH  BLANK  L 
INE": PRINT" YOU  WANT." 
PRINT: PRINT"ENTER  THE  W 

ORO  {rvsIendCoff}  when 

{SPACE} YOU  HAVE  ALL" 
PRINT"OF  YOUR  LINES  ENT 
KRED . " 

POKE  214 , 23 : PRINT: PRINTT 
AB(6)CHRS (18) "PRESS  ANY 

KEY  TO  BEGIN  INPUT"; 
GETAS: IFAS=""THEN220 
REM  INPUT  ROUTINE 
NL  =  1 

PRINTCHR$(147)CHR$(17)C 
HR$ (17) 

PRINT"ENTER  LINE  NUMBER 
"NL: PRINT: INPUTLI$(NL) 
IFLEN (LI$ (NL) ) <40THEN29 
0 

PRINT: PRINT"DON'T  USE  M 
ORE  THAN  39  CHARACTERS! 
":FORX=1TO 1500: NEXT: GOT 
0250 

IFLI5 (NL)<>"END"THENNL= 
NL+1:GOTO250 
PRINT"{15  DOWN}PRESS  AN 
Y  KEY  FOR  3  SECOND  DELA 
Y" 

GETA$: IFAS=""THEN310 
PRINT"{CLR}";F0RX=1T022 
00:NEXT 

POKE648,4a:PRINTCHR$ (14 
7) : P0KE64a,4:PRINTCHRS ( 
147) 

POKE  53 2 65, PEEK (53 265) AN 
D2470R7:FORX=1TONL-1 
IFCS="N"THEN383 
POKE214,23: PRINT:  PRINTS 
PC(20-LEN(LI$ (X))/2)LI$ 
(X); 

POKEe4  8,4B:POKE214,22:P 
SINT:PRINTSPC(20-LEN(LI 
$(X) )/2)LI$ (X) ; : GOTO  390 
POKE214,23:PRINT:PRINTL 
1$  (X) ; :POKE64  8,48:POKE2 
14,22:PRINT:PRINTLI$ (X) 


XE  390 
CR  400 

DP  410 
BR  42  0 


GG  430 
RQ  440 


XA  4  50 
MX  4  60 

QR  470 
MP  480 
SE  490 


POKE648,4:S 

FORX=lT024 

POKE198,0 

GETAS:IFA5 

POKE '53265,1 

,14:POKE532 

,14:PRINTCH 

DATA  169,6, 

DATA  173,17 

41,248,5,25 

,198,251,16 

DATA  160,11 

2,208,253,1 

DATA  201,25 

3,24,208,41 

1,24,208,16 

,2 

DATA  169,4, 

3,17,208,41 

,17,208,32, 

DATA  173,24 

,16,141,24, 

41,136,2 

DATA  32,234 

41,136,2,96 


YSB28:NEXT 
SYS828:NEXT; 


""THEN4 

55: POKE 

8 1 ,  6 : PO 

RS(147) 

133,251 

,208,16 

1,141,1 

5,251 

5,162,1 

36,208, 

5,208,2 

,15,9,1 

9,48,14 


10 

53280 
KE64  6 
:END 

,251, 
7,208 

60,20 

248 
26,17 
92,14 
1,136 


141,136,2,17 

,248,9,7,141 

234,232 

,208,41,15,9 

208,169,48,1 

,232,169,4,1 


Converter 


Vincent  C.  O'Connor 


Apple  owners  who  send  and  receive 
files  via  a  modem  will  appreciate  this 
BASIC  utility.  By  converting  binary 
files  into  text,  you  can  transfer  non- 
text files  without  the  usual  hassles. 
And  the  text  files  created  are  self- 
converting:  Simply  EXEC  the  text  file 
from  BASIC,  and  the  binary  version  is 
automatically  written  to  disk.  For  any 
Apple  11+,  lie,  lie,  or  lies  running 
either  DOS  3.3  or  ProDOS. 


One  of  the  advantages  of  owning  a 
modem  is  being  able  to  send  and 
receive  programs  and  data  files. 
Often,  however,  there's  a  problem 
transferring  binary  files  such  as 
shape  tables,  hi-res  pictures,  and 
binary  programs;  Many  terminal 
programs  are  set  up  to  send  ASCII 
text  files  only.  And  although  there 
are  programs  for  transferring  bina- 
ry files,  different  communications 
software  use  different  protocols, 
which  means  that  to  transfer  a  bina- 
ry file  to  or  from  a  bulletin  board, 
the  bulletin  board  must  use  the 
same  protocol  that  your  terminal 
program  uses. 

"Converter"  converts  binary 
files  to  text  files,  It  works  under 
DOS  3.3  and  ProDOS.  When  run 
under  ProDOS,  Converter  not  only 
converts  binary  files,  but  Apple- 
Works files  as  well.  Converter  in- 
cludes extensive  error  checking  and 
even  allows  you  to  catalog  a  disk 
from  within  the  program. 

Getting  Started 

Type  in  and  save  Programs  1 
through  3  using  "The  Automatic 
Proofreader"  program  found  else- 
where in  this  issue.  Save  Program  1 
using  the  filename  CONVERT,  Pro- 
gram 2  using  the  filename  CON- 
VERTl,  and  Program  3  using  the 
filename  CREATE.TEST.  Because 
Program  1  runs  Program  2,  you 
must  save  both  of  these  programs 


to  the  same  disk. 

When  you've  saved  each  pro- 
gram to  disk,  enter  the  command 
RUN  CREATE.TEST 

After  a  few  moments,  the  mes- 
sage DONE  appears.  The  CREATE 
.TEST  program  creates  a  binary  file 
called  TEST  on  your  disk.  We're 
going  to  use  this  file  to  test  run 
Converter,  Also,  by  converting 
TEST  into  a  text  file  and  then  con- 
verting it  back  to  binary  again, 
you'll  learn  how  to  use  the  Con- 
verter program. 

Binary  To  Text 

Reboot  your  system  to  clear  the 
binary  file  TEST  from  your  comput- 
er's memory.  Now,  load  and  run 
Converter  by  entering 
RUN  CONVERT 

After  a  few  moments,  you're  asked 
to  enter  a  filename,  or  you  can  type 
in  CAT  for  a  catalog  of  the  disk.  (If 
you  ever  forget  the  name  of  a  file  or 
need  to  search  several  disks  for  a 
particular  program,  this  catalog 
function  is  very  useful.)  To  test-run 
the  program,  enter  the  filename 
TEST  and  press  Return.  After  a  mo- 
ment, the  screen  clears  and  prints 
the  message  CONVERSION  IN 
PROCESS.  When  the  conversion  is 
complete,  the  computer  displays 

CONVERSION  COMPLETE. 
RUN  AGAIN  (Y/N)? 

Press  N  for  no.  If  you  catalog  your 
disk,  youTl  see  the  fHe  TEST.TXT. 
This  is  the  converted  binary  file, 
now  in  standard  text  format. 

Bacl(  To  Binary 

To  convert  the  text  file  back  into 
binary,  simply  EXEC  it.  As  an  ex- 
ample, let's  convert  the  text  file 
TEST.TXT  back  into  binary  format. 
Reboot  your  computer  to  remove 
the  binary  file  from  memory.  Next, 
type 
DELETE  TEST 
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to  delete  the  binary  file  from  disk. 
Now,  enter  the  command 
EXEC  TEST.TXT 

A  number  of  asterisks  appear  on 
the  left  side  of  the  screen,  followed 
by  the  message 

PLACE  DISK  YOU  WANT  BINARY  HLE 
SAVED  ON  IN  DRIVE  1,  THEN  TYPE 
RUN  AND  PRESS  <RETURN> 

Enter  RUN  and  press  Return. 

The  disk  whirs  as  the  file  is 
saved.  If  you  enter  CATALOG, 
you'll  see  that  the  binary  file  TEST 
is  once  again  on  the  disk. 

Restrictions 

There  are  a  few  restrictions  when 
using  Converter.  First,  you  cannot 
convert  VAR  or  SYS  files  under 
ProDOS.  Second,  text  files  created 
by  Converter  tend  to  be  two  to 
three  times  larger  than  the  original 
binary  file.  Finally,  you  cannot  con- 
vert files  that  occupy  the  same 
memory  locations  as  the  BASIC 
Converter  program.  If  you  do,  the 
program  aborts  with  the  message 
BINARY  HLE  HAS  OVERWRITTEN 
PROGRAM. 

How  It  Works 

When  a  binary  file  is  converted,  it  is 
translated  into  a  text  file  that  con- 
tains a  series  of  BASIC  and  monitor 
commands.  These  commands, 
when  executed  by  Applesoft's 
EXEC  statement,  reassemble  the  bi- 
nary file  in  memory  and  then  save  it 
out  to  disk. 

The  first  command  the  text  file 
contains  is  a  CALL  —151  to  enter 
the  monitor.  Next,  the  entire  binary 
file  is  placed  into  memory  using 
monitor  commands,  and  the  moni- 
tor is  exited  via  a  3 DOG. 

Following  the  monitor  com- 
mands is  a  one-line  program — two 
lines  if  the  file  was  originally  an 
AppleWorks  file  (see  below) — that 
saves  the  binary  file  back  to  disk. 
When  you  type  RUN  and  press  Re- 
turn, the  program  is  executed,  sav- 
ing the  binary  file  and  erasing  the 
program  from  memory. 

If  the  file  you're  converting  is 
from  AppleWorks,  the  program  cre- 
ated by  the  EXEC  file  is  two  lines 
long  instead  of  one.  This  is  because 
under  ProDOS,  any  file  BSAVEd 
with  the  T  parameter  must  first  be 
created  using  the  CREATE  com- 
mand. If  the  file  being  converted  is 


an  AppleWorks  word  processing 
file,  for  example,  then  it's  created 
like  this: 

PRINT  CHR$(4>"CREATE 
FILENAME,TAWF' 

Programming  Techniques 

There  are  some  useful  program- 
ming techniques  used  in  Converter 
that  can  be  easily  adapted  for  use  in 
your  own  programs.  The  first  is  in 
line  10.  By  PEEKing  memory  loca- 
tion 48896,  Converter  can  deter- 
mine if  you  are  using  DOS  3.3  or 
ProDOS,  If  this  location  contains  a 
decimal  76,  the  computer  is  run- 
ning under  ProDOS.  Otherwise 
DOS  3.3  is  assumed  to  be  active. 

Another  useful  routine  is  the 
decimal-to-hex  conversion  routines 
found  in  lines  50  and  55.  The  con- 
version routine  in  line  55  produces 
a  two-character  hexadecimal  num- 
ber between  0  and  255.  Line  50 
produces  four-digit  hexadecimal 
numbers  ranging  from  0  to  65535. 

The  subroutine  at  line  100 
demonstrates  an  efficient  way  to 
display  a  catalog  from  BASIC,  re- 
gardless of  the  disk  operating  sys- 
tem being  used.  If  PR  is  set  to  1, 
then  ProDOS  is  active  and  the  ab- 
breviated CAT  command  is  issued, 
insuring  a  directory  that  fits  on  the 
40-column  screen.  If  PR  is  set  to  0, 
then  DOS  3.3  is  active  and  the  long- 
er CATALOG  command  is  used.  By 
replacing  the  PR  =  1  in  line  100 
with  PEEK(48896},  you  can  place 
this  subroutine  directly  into  your 
own  programs. 

The  subroutine  beginning  at 
line  200  shows  how  to  access  a 
ProDOS  directory  from  BASIC.  It 
begins  by  setting  the  prefix  to  a  null 
path  (PRINT  D$"PREF1X/").  Next, 
the  volume  name  of  the  last  drive 
accessed  is  read  (PRINT  D$"PRE- 
FIX":INPUT  DR$).  Then,  the  cata- 
log is  opened  and  read  just  like  a 
sequential  text  file.  When  you  open 
a  catalog,  however,  you  must  use 
the  T  parameter  to  indicate  the  type 
of  file  that  you're  accessing.  In  this 
case,  the  program  specifies  type 
DIR,  for  director}'. 

For  instructions  on  entering  these  programs, 
please  refer  to  "COMPUTEI's  Guide  to  Typing 
In  Programs"  elsewtiere  in  this  issue. 

Program  1:  CONVERT 

D7  10  POKE  103,1:  POKE  104,96:  P 
OKE  24576,0 


a  15  PRINT  CHR*  (4) "RUN  CONVERT 
1" 

Program  2:  CONVERT! 

74  5  REM  COPYRIGHT  19B8  COMPUTE; 
PUBLICATIONS,  INC.  ftLL  RIG 
HTS  RESERVED. 

I?  6  DNERR  GOTO  230 

iF  7  D«  =  CHR*  (13)  +  CHRS  (4):  A 
1  =  43634: A2  =  43635: A3  =  4 
3616:A4  =  436l7i  DIM  Bt<16) 
,F»(64):Q»  =  CHR»  (34) 

93  10  IF  PEEK  (48896)  =  76  THEN 
PR  =  1:D»  =  CHR*  (4)!A1  = 
48855: A2  =  48856: A3  =  4885 
9:A4  =  48660 

IF  15  6  =  PEEK  (103)  +  PEEK  (104 
)  t  256:H  =  PEEK  (IIS)  +  P 
EEK  (116)  t  256:  TEXT  :  HO 
ME  :  HTAB  8:  INVERSE  :  PR! 
NT  "COPYRIBHT  1988  COMPUTE 
i";  PRINT  :  POKE  34,2:  NOR 
KAL 

4F  20  R*  =  CHR»  (34)  :  HOME  :  VTA 
B  3:  PRINT  "ENTER  FILE  NAM 
E,  OR  CAT  FOR  OISK  CATALOQ 
"s  VTAB  5:  INPUT  "NAME:  "; 
FL»!  IF  FL*  =  "CAT"  THEN  G 
OSUB  100:  HOME  !  GOTO  20 

44  23  IF  FL»  =  ""  THEN  85 

9S  25  ER  =  0:  GDSUB  150;  IF  ER  » 
I  THEN  ER  =  0:  VTAB  23:  P 
RINT  "INVALID  FILENAME-PRE 
SS  A  KEY  TO  CONTINUE";:  MA 
IT  -  16384,128:  POKE  -  163 
68,0:  HOME  :  GOTO  20 

HI  26  Fl«  =  FLS  +  ".TXT":F2«  =  F 
L»:Q  =  tl  »  (PR  =  1)  +26 
»  (PR  =  0) :  IF  LEN  {FL»)  > 
Q  THEN  Fl»  =  LEFT*  (FL*,D 
)  +  ".TXT" 

27  27  IF  PR  =  1  THEN  ER  =  0:  GOS 
UB  200:  IF  ER  =  1  THEN  ER 
»  0:FL»  =  ""rR*  =  CHR*  (34 
) ;  GOTO  20 

H  28  IF  PR  =  1  AND  TY*  <  >  "BIN 
"  THEN  FL*  =  FL*  +  ",A8192 
,T"  +  TY* 

64  30  PRINT  D«"BLOAD"FL*:A  =  PEE 
K  (Al)  +  PEEK  (A2)  «  2S6sL 
=  PEEK  (A3)  +  PEEK  (A4>  » 
256:  IF  A  <  -  H  AND  (A.  > 
=BDRA+L>=G)  THEN  H 
OME  !  VTAB  12:  PRINT  "BINA 
RY  FILE  HAS  OVERWRITTEN  PR 
OSRAM":  POKE  103,1:  POKE  1 
04, Si  POKE  2048,0: 

M   35  HOME  :  VTAB  12:  PRINT  "CON 
VERSION  IN  PROCESS. .."I LI 
=  L  -  1 

IC  40  PRINT  D«"DPEN"F1«:  PRINT  D 
»"WRITE"F1»:  PRINT  "CALL  - 
151" 

F?  45  J  =  0s  FOR  1  =  0  TO  Ll:Ji  = 
J  +  1 

ID  50  IF  J  =  1  THEN  N  =  I  +  A:AD 

*  =  "":  FOR  V  =  3  TO  0  STE 

P-1:N(V+1)=  INT  (N  / 

16  -^  V):N  =  N  -  (16  -^  V)  » 

N(V  +  1):AD*  =  AD*  +  MID* 

("01 23456789 ABCDEF " , N ( V  + 

1)  +  1,1):  NEXT  : 

11  55  N  =  PEEK  (I  +  A):B«(J!  =  " 
"s  FOR  V  =  1  TO  0  STEP  -  1 
;N(V  +  1)  -  INT  (t»I  /  16  ^ 
V)  :N  =  N  -  (16  -^  V)  «  N(V 
+  1):B«(J)  =  B*(J)  +  MID* 
("01234567a9ABCDEF",N(V  + 
1)  +  t,l) !  NEXT  : 

53  60  IF  J  =  16  OR  I  =  LI  THEN  P 

RINT  AD* j:  FOR  K  =  1  TO 

J:    PRINT    "    "B*(K);:    NEXT 
;    PRINT    tiJ    =    0 
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5F  65  NEXT  :  PRINT  "3D0G":  PRINT 
" PR I NT "Q»" PLACE  DISK  YOU 
WANT  BINARY  FILE"Q«t  PRINT 
"PR I NT "a»" SAVED  ON  IN  DRI 
VE  1,  THEN  TYPE"Q»:  PRINT 
"PRINT"D$"RUN  AND  PRESS  <R 
ETURN>"0» 
I!  67  IF  PR  =  1  AND  TY$  <  >  "BIN 
"  THEN  R»  =  ",J"    +  TY»  +  R 
»:  PRINT  "0  PRINT  CHR»(4>" 
Q* "CREATE  "F2«R» 
E7  70  PRINT  "1  PRINT  CHR*(4)"Q»" 
BSAVE  "F2«",A"A",L"LjR*"!N 
EW:  PRINT  D»"CL0SE"F1»5  H 
OME  t  VTAB  12:  PRINT  "CONV 
ERSION  COMPLETE"!  VTAB  14! 
PRINT  "RUN  ASAIN  <Y/N)?"; 
IF  75  WAIT  -  16384,128:  A  =  PEEK 

(  -  16364) I  POKE  -  16368,0 
58  80  Z  =  1  +  <A  =  217)  +  2  «  <A 
=  206)!  ON  Z    SOTO  75,20,8 
5 
n   85  PRINT  D»"CLaSE":  POKE  103, 
l!  POKE  104,9!  POKE  2048,0 
:  POKE  34,0:  HOME  :  NEW 
1!    100  HOME  :  PRINT  D«  LEFT*  t"C 
ATAL0B",7  -  4  *  (PR  =  1) ) 
i  PRINT  :  PRINT  "PRESS  AN 
Y  KEY  TO  CONTINUE"!  WAIT 

-  16384,128:  POKE  -  16368 
,0:  RETURN 

ff  150  IF  PR  =  0  THEN  165 

B?  152  IF  LEN  (FL«J  >  15  THEN  ER 

=  1:  RETURN 
ID  135  C  =  l!  FOR  I  «=  1  TO  LEN  ( 
FL*)iK  "  flSC  t  MID*  (FL«, 
1,1)  )>C  ■>  (  (K  >  64  AND  K 

<  91)  OR  (K  =  46)  OR  (K  > 
47  AND  K  <  58  AND  I  >  1) 

1    AND  C  =  1:  NEXT  :  IF  C 

=  0  THEN  ER  =  1 
ID  160  RETURN 

C2  165  K  =  ASC  (  LEFT*  (FL»,1)): 
IF  LEN  (FL»)  >  30  OR  K  < 
65  OR  K  >  "90  THEN  ER  =  1 

!  RETURN 
IF  170  RETURN 
BF  175  NEXT  :  RETURN 
C4  200  PRINT  D»"PREFIX/":  PRINT 

D«"PREFIX"!  INPUT  DR»:  PR 

INT  D«!  PRINT  D«"OPEN"DR« 

",TDIR":  PRINT  D«"READ"DR 

» 
in   205  TY»  =  '■":  FOR  I  =  1  TO  3: 

INPUT  A*;  NEXT 
E7  210  INPUT  F»(W):  IF  F»(W>  =  " 

"  THEN  225 
2!  215  IF  MID*  (F«(W),2,  LEN  (FL 

») )  =  FL$  THEN  TY»  =  MID* 
tF»(W), 18,3)!  0070  225 
7C  220  W  =  W  +  1:  GOTO  210 
E5  225  IF  TY«  <  >  "AWP"  AND  TY» 

<  >  "ADB"  AND  TV*  <  >  "AS 
P"  AND  TY»  <  >  "BIN"  THEN 

VTAB  20!  PRINT  "FILE  MUS 
T  BE  A  BINARY  OR  APPLEWOR 
K3  FILE":  PRINT  "PRESS  AN 
Y  KEY  TO  CONTINUE":  WAIT 

-  16384, 128:  POKE  -  16368 
,0:ER  =  1 

n  230  PRINT  D»"CLOSE"DR*!  RETUR 
N 

a  250  POKE  216,0:  CALL  -  3288: 
VTAB  21!  HTAB  It  CALL  -  9 
5a:ER  »  PEEK  (222) :LN  =  P 
EEK  (218)  +  PEEK  (219)  * 
256 

2D  255  IF  ER  =  3  THEN  PRINT  "DRI 
VE  IS  NOT  READY  -  READY  D 
RIVE":  GOTO  285 

5A  260  IF  ER  =  4  THEN  PRINT  "DIS 
K  IS  WRITE  PROTECTED  -  RE 
MOVE  TAB"!  SOTO  285 


IS  265  IF  ER  =■  6  THEN  PRINT  "FIL 
E  NOT  FOUND  -  CHECK  FOR  C 
ORRECT  DISK":  GOTO  285 

BE  270  IF  ER  =-  8  THEN  PRINT  "I/O 
ERROR  -  CHECK  DISK  AND  D 
RIVE  DOOR":  GOTO  285 

2C  275  IF  ER  =  77  THEN  PRINT  "IN 
SUFFICIENT  MEMORY  TO  CDNT 
INUE":  GOTO  2BS 

32  280  PRINT  "ERROR  #  "ER"  ENCOU 
NTERED  IN  LINE  "LN 

C3  2B5  PRINT  "PRESS  RETURN  TO  CO 
NT INUE,  ESCAPE  TO  END";: 
WAIT  -  16384,120:1  =  PEEK 
(  -  16384) :  POKE  -  16368 

.0 

41  290  IF  Z  =  155  THEN  85 
84  295  ONERR  BDTO  250 
47  300  RESUME 

Program  3:  CREATE.TEST 

4«  5  HOME  :  FOR  I  =  1  TO  80:  POK 

E  767  +1,1:  NEXT 
FC  10  PRINT  CHR*  (4)  "BSAVE  TEST, 

A76e,L80" 
14  15  VTAB  12:  PRINT  "TEST  FILE 

CREATED"  © 
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EDUCATIONAL  SOFTWARE 

Make  Learning  Come  Alive!  It's  fun  and 
exciting  when  you  use  this  Commodore 
Logo  Educational  Software.  Now  children 
and  adults  can  explore  math  concepts. 
With  list  processing,  Logo  can  be  inte- 
grated into  language  arts  and  other 
curriculum.  Color  graphics,  on-screen 
text,  and  enhanced  music  capabilities 
encourage  active,  hands-on  problem 
solving.  Take  advantage  of  the  LOW  price. 
Order  today.. .and  put  the  fun  back  into 
learning! 

•  Logo  is  a  Powerful  Computer  Language 
for  Learning,  Used  in  Many  Elementary 
Schools  Across  the  Nation. 

•  Easy  to  Use  for  the  Novice  or  Expert. 

•  Encourages  Experimentation. 

•  Enjoyable  and  User  Friendly. 

•  Text  Can  be  Put  on  Screen  for  Labeling 
Pictures,  Word  Games,  More. 

•  Changeable  Text  Color  Capability. 

•  Comes  with  Detailed  Information  Book- 
let, Language  Disk  and  Utility  Disk. 

•  Works  with  the  Commodore  64,  64C 
and  128  Computers  with  a  Compatible 
Disk  Drive. 

90-Day  Limited  Factory  Warranty. 
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sales  tax.  Sorry,  no  C.O.D.  orders) 

D  My  check  or  money  order  is  enclosed.  {No  delay!  In 
processing  orders  paid  by  check.) 


states  And  Capitals 


Elmer  Larsen  and  M.  D,  Perry,  Jr. 


This  educational  game  makes  learning 

fun.  There  are  three  ways  to  play,  each 
a  variation  that's  just  right  for  any 
member  of  the  family.  A  color /graphics 
adapter  or  equivalent  hardware  is  re- 
quired, along  with  BASICA  for  the  PC 
or  GW-BASIC  for  compatibles. 


If  you  think  geography  is  boring, 
wait  until  you  start  playing  "States 
and  Capitals."  After  a  few  minutes 
you'll  be  hooked.  And  best  of  all, 
you'll  be  learning  something  about 
the  U.S.  With  variations  that  allow 
you  to  work  on  states,  capitals,  or 
both  states  and  capitals,  this  game 
can  entertain  and  educate  children 
and  adults. 

Getting  Started 

Since  States  and  Capitals  is  written 
entirely  in  BASIC,  type  it  in,  save  a 
copy  to  disk,  and  type  RUN.  The  first 
thing  you'll  see  is  the  main  menu, 
which  lists  the  playing  options. 

You  can  guess  states  only,  cap- 
itals only,  or  combine  the  two  and 
guess  both  states  and  capitals.  Let's 
say,  for  example,  that  you  choose 
the  Capitals  option  from  the  menu. 
After  making  your  selection,  you'll 
see  a  green  map  of  the  continental 
U.S.  with  each  state's  borders  clear- 
ly marked  and  the  state  with  the 
first  mystery  capital  highlighted  in 
red.  Below  the  map  is  a  sentence 
informing  you  of  which  state  has 
been  selected  and  asking  you  to 
name  its  capital. 

Simply  type  in  the  name  of  the 
state's  capital  at  the  prompt.  Since 
States  and  Capitals  is  not  case  sen- 
sitive, you  can  type  your  answers 
either  in  upper-  or  lowercase.  If 
your  answer  is  correct,  the  program 
responds  with  a  RIGHT!  and 
changes  the  state's  color  to  brown. 


If  you're  wrong,  the  computer  gives 
you  the  correct  answer,  returns  the 
state's  color  to  green,  and  remem- 
bers the  state  so  it  can  ask  you  the 
capital  again  later. 

The  game  continues  in  this  fash- 
ion until  you've  answered  every  cap- 
ital correctly  and  every  state  on  the 
map  is  colored  brown.  When  you 
finish,  you  have  the  option  of  play- 
ing again  or  returning  to  BASIC. 

The  States-only  version  of  the 
game  is  like  Capitals.  One  by  one, 
each  state  is  highlighted  on  the  map 
with  red,  and  you're  asked  its 
name.  If  you  answer  correctly,  the 
state's  color  changes  to  brown,  and 
you  continue.  If  you're  incorrect, 
you'll  get  another  chance  later. 

For  the  States  and  Capitals  ver- 
sion of  the  game,  you  must  identify 
both  the  state  and  the  capital  to  win 
the  state.  Please  note  that  in  this 
and  the  other  variations,  spelling  is 
important.  We  should  also  note  that 
States  and  Capitals  doesn't  accept 
abbreviations.  St.  Paul,  for  example, 
must  be  spelled  as  Saint  Paul,  and 
South  Dakota  must  include  the  full 
spelling,  not  S.  for  South. 

Program  Notes 

The  section  of  States  and  Capitals 
that  draws  the  map  of  the  U.S  (lines 
130-800)  is  from  Icons  and  Images: 
A  Graphics  Collection  for  the  IBM  PC 
and  PCjr,  (available  from  COM- 
PUTE! Books).  This  routine  creates 
a  realistic  representation  of  the  con- 
tinental U.S.,  with  each  state's 
boundary  accurately  outlined. 

The  information  on  each  state 
and  capital  is  stored  in  four  arrays 
of  48  elements  each.  This  infor- 
mation includes  the  x  and  y  coordi- 
nates of  a  point  within  the  state  for 
the  PAINT  command,  the  name  of 
the  state,  and  the  capital.  The 
arrays  are  filled  by  simply  READ- 


"States  And  Capitals,"  an  educational 
game  for  the  whole  family. 

ing  the  DATA  statements  that  be- 
gin in  line  840. 

States  and  Capitals  uses  the 
random  number  generator  to  obtain 
each  state's  index  number.  As  a 
player  correctly  identifies  each  state 
or  capital,  or  both  (depending  on 
the  variation  of  the  game  being 
played),  the  state  is  removed  from 
the  array  and  the  number  of  states 
available  decreases  by  one.  This 
prevents  a  state  from  being  selected 
a  second  time  after  the  state  has 
been  correctly  identified.  When  the 
number  of  states  reaches  0,  all 
states  have  been  correctly  identified 
and  the  game  is  over. 

States  and  Capitals 

For  instructions  on  entering  this  program, 
please  refer  to  "COMPUTEI's  Guide  to  Typing 
In  Programs"  elsewhere  in  this  issue. 

HI    100  REM  Copyright  19B8,  CQMPU 
TEI  Publications,  Inc.  - 
All  Rights  RCEerved 

NO  120  POKE  !(H417,PEEK(SiH417)  OR 
64 

m    130    SCREEN   0! WIDTH   401  COLOR    1 
4,  1,0 

CD  140  CL3:LDCftTE  3,12:PRINT  "ST 
ATES  and  CAPITALS" :LDCflTE 
5, 3: PRINT  "Copyright  198 
8  COMPUTE!  Publ.,  Inc."iL 
OCATE  6, 12jPRINT"A1I  Rlgh 
ts  Rmuarvma" 

11    130   LOCATE   9,a!pRINT"C11    Stat 
«•' 

EK    160   LOCATE    10, 8:  PRINT"  C21    Cap 
itals" 
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FP 

170 

HL 

1.B0 

EP 

190 

K 

200 

LO 

210 

n 

2Z0 

FD  230 

CO  235 
m  240 
PN  2S0 

RN  260 


gC  280 
KB  290 
61  300 

CE  310 


BF 

320 

JC 

330 

IK 

340 

SE 

350 

DK 

360 

EG 

370 

in 

380 

IE  390 

IP  400 
KP  410 
KN  420 
AF  430 
U   440 

n  4S0 

DC  460 
IE  470 
OK  480 

a  490 

HI   S00 


OX  510 

m  520 
in  530 

tf   540 
DF   550 


LOCATE  11, 8: PRINT" C3]  Sta 

t»  and  Capitals" 

LOCATE  12,B:PRINT"C43  Qui 

t" 

LOCATE  13, 14:  lNPLrr"Seloct 

ion";M* 

IF  M»<"1"  OR  M»>"4-  THEN 

190 

IF  M»-"4"  THEN  CLS:END 

DIM  H(4a),V(48),ST»(4B),C 

AP»(48> 

SCREEN  i,0J   CL5:   KEY  DF 

F 

COLOR  0,0 

LINE  (S0,5)-C269,20),3,B 

LOCATE  2, 12: PRINT  "STATES 

and  CAPITALS" 
REM  LOCATE  3, 4: PRINT  "  ** 
t««tt*ttt**tttttt«««*(*«( 
t««t>t*"| 
X-70:   Y-30 
BDY-1 

80SUB  370: REM  ««t  USA  OUT 
LINE  t*t 

LL»=-CHR»  (200) : UL»»CHR«  <20 
1 )  I  IJR»-CHR«  ( 187) :  LR«-CHR» 

( 1S8> : VT«oCHR«  < 186) I HZ"20 

5 

PAINT  (X+B,Y+4),1',6dY 

BDY-0 

BDSUB  540s  REM  t*«  STATE  B 

OUNOARIES  t«t 

BOTO  820 

REM  tt*  USA  OUTLINE  S/R  t 

«t 

PSET  <X,Y),BDY  * — Start  a 

t  NW  cornwr 

DRAW  "NR90F2D1L1D382H1U4L 

3U 1 L2D4R 1 D6M- 1 , + 1 0M-2, +SD 

5Q1D3F1" 

DRAW    "D5ri+4,+10R2D3M+3,+l 

0ft3F5M+3, +6R3E1R4D2M+14,  + 

7R13U2" 

DRAW  "RSF3R1F3R1D2R1D2F4R 

1 E3R4F2R 1 F2F5R 1 D3M+9 , +3R2 

M-2,-7" 

DRAW  "U2M+13,-11RBE1R1F2R 

lElRlNRlF2NU2eiH2ElR3UlR2 

U1R6" 

DRAW  "UlR7F2RlElM+7,+5D3R 

1D3M+4, +6M+6, +4D1F1R2E2U3 

M-10,-16" 

DRAW  "U3E2U1E2R2E2U1R2M+9 

, -BU1H1NL1E1U1H3L2M-3, -6L 

1UBR2D4" 

DRAW  ■■R1D2F2U2E1U1L1U4H1U 

3FlR2FtRlElUlH2E2E2NDlFlD 

1NE2U1" 

DRAW  "t«2BHlUlE2R2ElFlNDl 

Fl.M-)-6,  -2NB1NH1BL3H2U6E1U2 

E2" 

DRAW  "M+4,-5RlElUlH2UlLlU 

3H2L2HlHlM-2,+10BlL2L14ai 

L1B2" 

DRAW  "D2BlL2eiL481L3QlF2M 

-8, +5M-5, +2L2HlLiHlElUlEl 

U4" 

DRAW  "M-2,-3eiD2H2U3H3BL2 

D 1 e2D2G 1 D3F 1 DSB 1 D 1 B2L 1 H2U 

SHIU3" 

DRAW  •■E1U4E1U3E1R1E2R3F1E 

iRlElUlNRlHlL2HlL28tL2HlL 

2U2" 

DRAW  '■ElLlQ2LlM-4,+2L2UlB 

l.M-4,  -»-lUlE4RlElRlHlL2HlL3 

BILIHI" 

DRAW  ■■BlH2L3eiH2L2UlHlD2" 

RETURN 

REM  *t(  STATE  BOUNDARIES 

S/R  ttt 

PSET  <  X -7 , Y+33 ) ,  BDY 

DRAW  "NL3R13NR31D14M+17,2 

2a2F 1 Q 1 D 1 NQ2BU 1 0U3R3U3NR7 


4U25" 
CC  560  DRAW  "LBU9E1H2E3U1H1MU16S 

1L9B1L3H1L3U2H1L4" 
C6  570  PSET  (X+62,Y),BDY 
EO  580  DRAW  "D13NR26DSNL23D9NR21 

D10R8ND21L26ND47L6U19" 
PJ  590  PSET  (X+23,  Y)  ,BDYi   DRAW 

"D6F1D3F3D4RIE1F2D1F2R3E1 


HL  600 
IL  610 


BE  620 


CB  630 

ID  640 

ik  650 

on  660 

PK  670 


CD  680 


KP  690 

NL  700 


DB  710 


on 

720 

K 

730 

EN 

740 

H6 

750 

El 

760 

IB 

770 

Hi 

780 

JA 

790 

SH 

800 

BE 

B10 

ti 

B20 

Pt  830 

CD  840 
PE  SS0 
BK  S60 
LH  870 
OJ  BB0 
BL  890 
la  900 
DA  910 
HD  920 
OH  930 

ee  940 

EA  950 
U  960 

Bl.  970 


PSET  tX+B6,Y>,BDY 

DRAW  "D6F1D3F1D4Q1D1F2D4N 

Rl SD3F  t  D3H2L2H 1 NL3BF5NU 1 " 

DRAW  °M+4,+10NL23F2OlF3Dl 

2NR13M+3,+16FlD3F2D6"  '-K 

A,  OK 

PSET  a+51,Y+e2),BDY 

DRAW  "R14U21NU2R12D7R3F1R 

3F1R3F2E1R3F1E1R2F1" 

PSET  {X+104,Y+10>,BDY 

DRAW  "NR2D3Q2D4M+4,+5D2F2 

NR11F3D3Q1L1Q1D2NL15" 
DRAW  "D3F2D1F2D2Q1F1D1F2D 
3F2D 1 G2D2L2U2BR2D 1 M-2 ,+11 
NL10" 

DRAW  "F1D4B1D4R10D3BR4BU1 
M+ 1 , - 1 3USNL 1 3R 1 0M+3 , +aD6N 
F1L9D3" 

PSET  ( X+158, Y+e0) , BDY 
DRAW  ■'L2B2L13BUI5NL4R2NR6 
E2R 1 E2R 1 E2U 1 NL2NR23" 
DRAW  ■■BD8BL2M+10,  +BNF 1 BR9 
BU4H5L6U1L7Q1BU7L24D1L10" 

'-GA,SC,NC,TN 
PSET  (X+121,  Y-i-33),BDY 
DRAW  "D1401D4  B1D1NG3R2E1 
R1E2R1E2U1E1R2NU16R1F1R3" 
DRAW  ■■F2R2F5NB4R2M+7,-6Ui 
E1U1F2E1U2E2F3D1F2R1F1" 
PSET  (X-H24,Y+30)  ,BD¥ 
DRAW  "R12BR9BE2BR2NR20NH1 
BL2DllU4Q2D4NM-6,+10BE2R2 
3E2U 1 " 

DRAW  "H2UlE2NH2M+4,+3FlNF 
lBE2HlU13LlU6BR5M-2,+13" 
DRAW  ■'  NL2R5NU 1 3NR2BD3NF3L 
2ND2L4" 

PSET  (X+120, Y+15},BDY:  D 
RAW  "H4L3H2" 

PSET  (X+153, Y+40>,BD¥s   D 
RAW  "D2R1E1R3F3BU5BR7R3D1 
0NR2" 
RETURN 

REM  ttt  BEBIN  MAIN  ROUTIN 
E  tt* 

RESTORE: FOR  I»l  TO  48: RE A 
D  H ( I ) , V ( I ) , ST» ( I ) , CAP* ( I 
) I  NEXT 

DATA  202, 106. ALABAMA, MONT 
BOHERY 

DATA  100, 100, ARIZONA, PHOE 
NIX 

DATA  176, 95, ARKANSAS, LITT 
LE  ROCK 

DATA  70, 80, CALIFORNIA, SAC 
RAMENTO 

DATA  1 25 , B0 , COLORADO , DENV 
ER 

DATA  250, 61, CONNECTICUT, H 
ARTFORD 

DATA  242, 75, DELAWARE, DOVE 
R 

DATA  223, 120, FLORIDA, TALL 
AHAS8EE 

DATA  218, 108,eEORQIA,ATLA 
NTA 

DATA  93, SB, IDAHO, BOISE 
DATA  185,70, ILLINOIS, 8PRI 
NGFIELD 

DATA  195,70, INDIANA, INDIA 
NAPOLI8 

DATA  168,60, IOWA, DCS  MOIN 
ES 
DATA  155, 80, KANSAS, TOPEKA 


FP  980  DATA  200,  85,  KENTUCKY,  FRAN 

KFORT 
BN  990  DATA  176,  1 10,  LOUISIANA,  BA 

TON  ROUBE 
JI  1000  DATA  260,  40,  MAINE,  AUGUST 

A 
Pf  1010  DATA  235,  72,  MARYLAND,  ANN 

AP0LI8 
CB  1020  DATA  253,57,MASSACHUSETT 

S, BOSTON 
LH  1030  DATA  19a,55,MICHISAN,LAN 

SINQ 
AE  1040  DATA  168,  40,  MINNESOTA,  3A 

INT  PAUL 
II  1050  DATA  190,  106, MISSISSIPPI 

, JACKSON 
Kl  1060  DATA  175,  80,  MISSOURI,  JEF 

PERSON  CITY 
JA  1070  DATA  115, 40,  MONTANA,  h«LE 

NA 
HP  1080  DATA  147, 65,  NEBRASKA,  LIN 

COLN 
JJ  1090  DATA  85,  73,  NEVADA,  CARSON 

CITY 
Kl  1100  DATA  253, 50,  NEW  HAMPSHIR 

E, CONCORD 
AD  1110  DATA  244, 67,  NEW  JERSEY, T 

RENTON 
PL  1120  DATA  125, 100, NEW  MEXICO, 

SANTA  FE 
KP  1130  DATA  240,  30,  NEW  YORK,  ALB 

ANY 
KP  1140  DATA  235, 93,  NORTH  CAROL  I 

NA,RALEI6H 
FE  1150  DATA  145, 35,  NORTH  DAKOTA 

.BISMARCK 
NH  1160  DATA  210,65,OHIO,COLU?1BU 

S 
ED  H70  DATA  155,  93,  OKLAHOMA, OKL 

AHDMA  CITY 
f6  11B0  DATA  75,5a,ORES0N,SALEM 
m    1190  DATA  230, 63, PENNSYLVANIA 

,HARRI9BUR8 
DP  1200  DATA  256, 61,  RHODE  ISLAND 

, PROVIDENCE 
BH  1210  DATA  230,  100,  SOUTH  CAROL 

I NA, COLUMBIA 
PN  1220  DATA  145, 50,  SOUTH  DAKOTA 

, PIERRE 
LK  1230  DATA  200,  95,  TENNESSEE,  NA 

8HVILLE 
BH  1240  DATA  150,  1 10,  TEXAS,  AUSTI 

N 
KP  1250  DATA  102, 80,  UTAH,  SALT  LA 

KE  CITY 
HN  1260  DATA  249,  46,  VERMONT,  MONT 

PELIER 
HC  1270  DATA  223,83,  VIRQINIA,RIC 

HMOND 
BJ  1280  DATA  75, 40,  WASHIN8T0N,0L 

YMPIA 
LJ  1290  DATA  220, 75,  WEST  VIRBINI 

A, CHARLESTON 
(11  1300  DATA  183, 51,  WISCONSIN,  MA 

DISON 
DD  1310  DATA  122,  60,  WYOMING,  CHEY 

ENNE 
PJ  1320  s 

a.  1330,  F«M MAIN 

LP  1340  SR-4a 

DA  1350  WHILE  SR>0 

It   1360  t    QOSUB  1450    :REn  RA 

NDOMIZE 
Ot  1363  I    V  >  0 
ni    1370  :    IF  M«-"l"  THEN  G0SU8 

1490 
m   1380  I    IF  H*»"2-  T«N  BOSUB 

1980 
H  1390  I    IF  M«""3"  THEN  SOSUB 
14901  IF  8-1  THEN  308UB 
1380 
W  1400  I    IF  V-1  THEN  QGSUB  16 
70  I  ELSE  QOSUB  1680 
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FN  1410  MEND 

HP  1420  END 

PQ  1430  : 

M  1440  REM RflNDOMIZE 

F6  1450  RANDOMIIE  TIMER:  RN=  INT  (R 
ND*SR)-M|B08UB  1710 

JF  1460  RETURN 

BK  1470  t 

M   1480   FtEM STATE 

m   1490  LOCATE  19, lllPRINT"ENTER 
NAME  OF  STATE 1  " 

Ul   1500   LOCATE   21,14:LINE    INfnjT 
LItllF   LEN(LI«)<4   THEN    1 
490 

Q03UB  17801  IF  CS«-ST«(RN 
)  THEN  1340  ELSE  1520 
3-0: LOCATE  23, Is  PRINT  "3 
ORRY,  THE  STATE  18  "j 
PRINT  ST* <RN) 1 1  LOCATE  24 
, Si  PRINT" YQU  WILL  BEE  TH 
IS  STATE  ASAIN  iXtiBOSUB 

1720 
FOR  I-l  TQ  3000: NEXT 
RETURN 

8=1: LOCATE  24, 16: PRINT  " 
RISHT!»;:V-1:BD3UB  1730 
RETURN 

REM  CAPITAL 

FOR  Y=19  TO  24 1  LOCATE  Y, 
ll PRINT  BPACE*(3?};iNEXT 
LOCATE  1 9 , 3 : PR INT " ENTER 
STATE  CAPITAL  OF  ";3T«(R 
N) 

LOCATE  2i,14tLINE  INPUT 
LItilF  LEN(LI*)<4  THEN  1 
600 

QOSUB  17B0SIF  CS«-CAP« (R 
N)  THEN  1630 
LOCATE  23,3:PRINT"SCffiRY, 
THE  ANSWER  IS  "|CAP«<RN 
>|lV=0:GOSUB  17409  RETURN 
LOCATE  24,l4sPRINT"RISHT 
•  •■  It  VI:  QOSUB  1730 
RETURN 

REM  UPDATE  

FDR  I-RN  TO  SR-1 
H(I)=H(I+1)  :V(I)-V<I+1) 
tST«(I)'3T«(I+l)  |CAP«( 
I) -CAP* (1+1) 

NEXTlSR-SR-illF  SR-0  THE 
N  QOSUB  1750 1  GOTO  1760 
FOR  Y"19  TO  24i LOCATE  Y, 
liPRINT  SPACE* (39); 3 NEXT 
RETURN 
I 

PAINT (H(RN) ,V(RN) ) , 2, BDY 
I  RETURN 

PAirrr  (H(RN),v(rn>)  ,i,bd 

YlFlETURN 

PAINT  (H(RN),V(RN)},3,B0 
Y I  return 

LOCATE  24,51  PRINT  "YOU  W 
ILL  SEE  THIS  STATE  AGAIN 
!"}lPAINT  (H(RN),V(RN)) 
,i,BDYtFQR  I>1  TO  30001 N 
EXT 

FOR  1-19  TO  24: LOCATE  I, 
llPRINT  SPACE* ( 39) ;t NEXT 
: RETURN 

LOCATE  19, 2: PRINT  "HOOD 
FOR  YDU.  YOU  COMPLETED  T 


n  1S10 

LL  1S20 
M  1S30 


m  1S3Z 

KQ  1534 

n  1540 

JE  15S0 
BJ  1560 
HI  1570 
HJ  1SS0 

OH  1590 


DL  1600 

Dt.  1610 
It  1620 

JB  1630 

it  1640 
91  1650 
BI  1660 
JH  1670 
OK  1672 

IF  1674 

HL  1680 

KC  1690 
PL  1700 
HD  1710 

XN  1720 

KB  1730 

BI  1740 


CK  1750 


LF  1760 


HE  TEST 


■| 


BI  1770  LOCATE  21,1:  PRINT  "TO  DO 
IT  ASAIN,  JUST  PRESS  'F 

2'.": END 
HE  1780  CS«="":FOR  I-l  TO  LEN(LI 

«) tL-ASC<MID*(LI*, 1,1)) I 

IF  L>96  AND  L<123  THEN  L 

-L   AND   223 
EU   1790   CS*=CS*+CHR»(L):r«XT!RET 

URN  (S 


Automatic 

Menus 
For  IBM  PC 


Charles  L.  Banks 


You  might  think  that  the  easy-to-use, 
pop-up  menus  found  in  commercial 
software  are  too  difficult  to  create  and 
incorporate  in  your  own  programs, 
but  with  "Automatic  Menus,"  they're 
a  snap.  BASICA  is  required  for  the 
PC,  GW-BASIC  for  compatibles,  or 
Cartridge  BASIC  for  the  PCjr. 


A  neat,  user-friendly  menu  adds  a 
professional  touch  to  any  piece  of 
software,  but  writing  and  debug- 
ging menus  for  each  new  program 
can  be  both  tedious  and  time  con- 
suming. And  menus  can  use  a  lot  of 
your  computer's  memory.  "Auto- 
matic Menus"  is  a  subroutine  that 
you  can  include  in  any  of  your 
BASIC  programs  that  will  solve 
your  menu  problems  and  will  give 
your  programs  a  professional  shine. 

Getting  Started 

Since  the  Automatic  Menus  Demo 
is  written  entirely  in  BASIC,  simply 
type  it  in,  save  a  copy  to  disk,  and 
type  RUN. 

In  the  demonstration  program, 
lines  40-80  show  how  to  use  the 
menu  subroutine  which  begins  in 
line  1000,  The  Demo  displays  a  14- 
item  menu,  but  any  number  up  to 
22  is  possible.  The  RESTORE  state- 


ment resets  the  DATA  pointer  and 
makes  the  menu  reusable. 

To  call  the  Automatic  Menus 
subroutines,  first  set  M  equal  to  the 
number  of  items  in  your  menu 
(again,  22  is  the  maximum).  Then 
load  the  ITEMS  array  with  your 
menu  choices.  The  demonstration 
program  shows  an  easy  and  efficient 
way  to  do  this.  Now,  a  GOSUB  to 
the  Automatic  Menus  subroutine  in 
line  1000  instantly  displays  a  sim- 
ple, attractive  menu  in  a  box  in  the 
center  of  the  screen. 

The  user  selects  an  item  by 
moving  the  up-  and  down-cursor 
keys  and  pressing  Enter  to  activate 
the  choice.  Automatic  Menus  stores 
the  selection  in  the  variable  SEL 
and  returns  to  your  main  program. 

Arranging  The  Array 

Two  statements  are  needed  at  the 
beginning  of  your  main  program 
for  Automatic  Menus  to  work  as  it's 
written.  DIM  ITEM$(22)  creates  the 
array  for  your  list  of  menu  items. 
OPTION  BASE  1  causes  all  arrays 
to  start  with  an  index  of  1  instead  of 
0,  Having  array  indexes  begin  with 
1  makes  it  much  easier  to  keep  track 
of  selections  and  to  use  an  ON  SEL 
GOSUB  command  to  process  the 
user's  menu  selection.  Remember, 
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this  affects  all  arrays  in  your  pro- 
gram and  must  appear  before  any 
DIM  statements. 

Automatic  Menus  is  written  for 
80-column  text  mode  and  it  will 
work  with  any  monitor — color  or 
monochrome — though  the  COLOR 
statements  may  need  to  be  modi- 
fied for  some  displays.  The  pro- 
gram will  also  work  in  40-column 
mode,  but  the  value  40  in  line  1050 
must  be  changed  to  20 — the  center 
of  a  40-column  screen.  You  may 
want  to  experiment  with  various 
colors  to  find  which  ones  work  best 
with  each  program. 

How  It  Works 

When  Automatic  Menus  is  entered, 
it  first  decides  on  which  line  the  top 
menu  item  should  be  printed  to 
center  it  vertically.  It  then  calculates 
the  length  of  the  longest  menu  item 
and  uses  that  value  to  center  the 
menu  horizontally.  Next,  a  double- 
line  box  is  drawn  one  character 
wider  than  the  text.  Finally,  the 
menu  items  are  printed  in  the  box. 

At  this  point,  the  program  enters 
a  loop  to  move  through  the  menu  to 
get  the  user's  selection.  First,  the  cur- 
rent selection  is  printed  in  reverse 
video.  Then,  any  leftover  keystrokes 
are  cleared  from  the  keyboard  buffer, 
and  an  INKEY$  statement  is  used  to 
get  the  next  keystroke. 

When  a  key  is  pressed,  the  cur- 
rent selection  is  reprinted  in  normal 
video.  If"  the  key  was  the  down 
cursor,  SEL  is  incremented  by  1  or 
is  vflrapped  back  to  the  top  of  the 
menu.  If  the  key  was  the  up  cursor, 
SEL  is  decremented  by  1  or  is 
wrapped  to  the  bottom  of  the 
menu.  The  IF  statements  check  for 
both  the  cursor  keys  and  the  num- 
bers 2  and  8.  This  way,  the  routine 
works  with  or  without  the  NUM 
LOCK  key  depressed. 

When  the  Enter  key  is  pressed, 
the  screen  clears  and  Automatic 
Menus  returns  to  the  main  program 
with  the  user's  menu  selection 
stored  in  SEL. 

Automatic  Menus  Demo 

For  Instructions  on  entering  this  progrom, 
please  refer  to  "COIvlPUTEi's  Guide  to  Typing 
In  Programs"  eisewhere  in  this  issue. 

EC   1    '    Copvright    1988   COMPUTE!    P 

ublicatians.     Inc. 
FH  2    '  All    Rightm   Rb> 

erved 
IJ   3    '  MJTO^ENU.BA 

S 


PJ  4  ' 
Pi!  5  ' 

a   10  '  «**««  Initialize  *t*tt 
6f  20  KEY  OFF  s  SCREEN  0  t     COLOR 
6,0,0  :  OPTION  BASE  1  :  D 
IM  ITEM* (22) 
DH  30  '  t«tt(  Defflonstration  Prog 

ram  ***** 
NL  40  RESTORE  500 
EC  50  H-14  :  FDR  I  -  1  TO  M  :  RE 

AD  ITEM* (I)  !  NEXT 
m   60  BOSUB  1000 
OH  70  LOCATE  12,32  :  PRINT  "ycju 

ChDSB  ";ITEM«(3EL) 
K  80  END 

JK  S00  DATA  Iten  On*,  Itm  Tmo,  It 
em  Three, Item  Four, Item  F 
tv«, Iten  Six, Item  Seven, I 
tee  Eight, Iten  Nine, It*m 
Ten, Item  Eleven, Item  Twel 
ve,  Iteai  Thirteen,  Item  Fou 
rteen 
DC  999  '  **«*«  Menu  Subroutine  t 

«*«* 

JB   1000   CLS    :    SEL°1    i    H-1    s    PRIN 

T    :    F^INT    TAB<20)"Capyrl 

ght    1988   COMPUTE!    Public 

•tlons.    Inc." 

f!    1005   PRINT    TAB<31>"A11    Rights 

Reserved" 
I! J   1010    IF    M»22    THEN    TOP-2   ELSE 

T0P-12-INT(M/2> 
flP    1020   FOR    I"l    TO    M 
EO    1030    IF    LEN<ITEM*(I)>     >    W   THE 

N   W=LEN(ITEM*(I)) 
01    1040   NEXT 

EB  1050  START-40-INTtH/2J 
CH  1060  J-START-1  i  K-START+W 
U  1070  COLOR  3,0,0 
a   1079  '  «****.  Draw  frame  ***** 
EG  1080  LOCATE  TOP-l,J  :  PRINT  C 

hffi«(201>; 
CP  1090  FOR  I-l  TO  H  :  PRINT  CHR 
*(205)J  J  NEXT  I  PRINT  C 
HR*(1B7) 
DL  1100  LOCATE  TOP,  1 
10  1110  FOR  I-l  TD  H    !  PRINT  TAB 
<J) jCHR»{186);TAB(K);CHR 
«(186>  :  NEXT 
ffi  1120  LOCATE  TOP+«,J  s  PRINT  C 

HR*(200); 
JF  1130  FOR  1=1  TO  W  :  PRINT  CHR 
•(203)5  S  NEXT  s  PRINT  C 
HR*(I88); 
LH  1139  '  *****  Display  menu  ite 

m*  ***** 
CJ  1140  COLOR  6,0,0  J  LOCATE  TOP 

,1 
M  1150  FOR  1=1  TO  M  s  LCM»TE  TO 

P+I-1, START  !  PRINT  ITEM 

«{I>  :  NEXT 
DL  1159  '  *****  Process  keyboard 

input  ««««« 
III    1160  COLOR  0,7,0  :  L(M:ATE  TOP 

+SEL-t,START  s  PRINT  ITE 

M«<SEL)  :  COLOR  6,0,0 
*H  1170  DEF  SE6=0  i    POKE  1050,  PE 

EK(1052)  '  Clear  keyboar 

d  bu-Ffer 
CB  1180  X»-=INKEY«  !  IF  X*=""  THE 

N  1180 
no  1190  LOCATE  TOP+SEL-1 ,  START  I 

PRINT  ITEM* (SEL) 
FC  1200  IF  MID»(X«,2,  1)-"P"  OR  X 

«»"2"  THEN  IF  SEL<M  THEN 
SEL=SEL+1  ELSE  SEL=1 
BF  1210  IF  MID»(X»,2,  1)="H"  OR  X 

*-"8"  THEN  IF  SEL>1  THEN 
SEL=SEL-1  ELSE  SEL=M 
HJ  1220  IF  flSC(X»)  =  13  THEN  CLS  t 

RETURN 
NN  1230  80T0  1160  <5 
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154111571  _ _ 

DRiVe  AUGriivlEnT 

.excellent,  efficient  program  that  can  help  yvu  save  tx>tt> 
money  and  downtime. "  Computers  Gazette, 

Dflc..  1987 
1 541  /I  S71  Drive  Alignmetit  reports  the  alignment  cordi- 
Ikjn  ol  tfie  disk  drive  as  yoy  perionn  ad^JSltnenls.  On 
screen  he^p  is  available  while  Ihe  progfam  is  running. 
Indudes  features  tor  speed  adjustment  and  slop  adjust- 
ment. Complete  instruction  manual  on  aligning  both  1 54 1 
and  1 57 1  drives.  Even  includes  instructions  on  tiow  toload 
alignment  program  when  r>othing  else  will  load'  Works  on 
the  064,  SX64,  CI  2B  in  either  64  or  1 28  mo<Jei  AulotXMts 
to  all  modes.  Second  drive  fully  supported.  Program  disk, 
calitiration  disk  and  insinictKxi  manual  only  34.95! 


^ — ^<^  SuperSt  Utilittesisacompleteulities 

''^^  ^    ^,         package  lor  the  Ckimmodore  1581 

»«   I     )        Disk  Drive  and  Ct  28  computer.  Copy 

^^^  -~y        whole  disks  or  indrviduaJ  hies  from 

1541    or   1571    [urIiliDns.   Backup 

1581    disks.    Contains    1661    Disk 

Editor,  Drive  Monitor,  RkM  Wriler,  CP/M  Utilities  and  more 

lor  onlyS39.95. 
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The  Number  Show 


Ttia  Numb«f  Show  «s  cseaied  lor  preschool  and  kindergarten 
children.  The  pfOQfairTi  uses  scenes  and  enercises  lo  ntfoduce  num- 
ber 1  -9.  WpiQ  ctwWi'Hn  10  develop  courrlng.  numeral  lead^ig  and 
keyboard  EkiBs  The  pfogram  is  dwdfd  nio  four  pans 
TMnlil*.  TMtnhiQ  shows  a  scerte  wAh  litne  chiUf  en  ant}  3  dkag  ^itfttg 
arouM]  a  carnp^ire  As  each  slaw  comes  out.  a  Uifge number  rt  rherigM 
hand  camw  o)  the  screen  couits  the  stars  a&  mus<c  ptayi 
T*rvii«Anyon*7£ncMsalintedogby4leruii»coi^  AsirifrDaHtxxKi- 
ces  tack  divs  <onh  The  num&er  or*  Itie  screen  char^ges 
Sptoihl  E^KJwshwo  siTkai  chiBren  and  a  pond  The  number  changes  as 
3  ct"iti  rJf^K  *iio  ^^  waler  wlh  a  spiasJh. 

Show Ttfiwccniams several 5cer>es  inoneo'themacoy  slacereacts 
with  worvJer  as  Winking  (ireflies  pa&s  by  and  a  number  counw 
Eacn  part  of  the  program  n  loilowed  by  ejserciw*  to  leach  numMr 
^■lls  and.lo  re«i(o«x:e  leammg  The  Numbe*  Show  waa  created  bv 
Joanne  Ashdown.  a  sclrooi  oayctiokjgisi  »*tKi  ib  alu  a  lakenied  arlMt 
VKlprogiammftr  Thft  Numiber  Shew*  15  currenlty  avaiLatrie  hx  Appte  tl 
se(iescomputeis(l?SK  memaryfetiiji/M^  »19.fl5! 


t£orrt)btarrr 

l'«ars  «BO.  ^'■^•^  VauUhB^H.  »  ponfrilul  incT  pvil  ^iirAid.  il'i  f> 
Tofcn  ol  f'Uifi  »"<!  hW  II  so-riawhBi*  wTl^'n  Hn  mtnc  MncikJ«iii-« 
flyi^peon^  ol  Pijinila.  Willi  the  peopla  Ifiui  r!liibO*(!.  vjgiihiapi  h*T? 
U^i>  irifr  'lid    Tng  ilrp«  hxjCQme  to  lih«  il  b^ck' 

Chi  l»nd  ol  PallOiiJ  11  «  l»'5*  n'Jinrl  wilh  mini*  *m»<i*'  lsi( 
luiioorwllng  Ifou  will  nplo'i  rii"ii  ol  nnm  on  irOU'  qb«»i  'i»"  ti-- 
iDiCh.  AUhuugn  you  lt«ri  m%  m  co>rmo>n  rihitri.  jOu  Vt  \*'  I 
connino"  Tou  .p>OilAtt  m*  >»*\  ol  tl>t  mi(»iinoui  T-jckilo"**'  f. 
n>«{]lc.  Incrias*  yout  nghii^^g  tVtnQtn  ifl<l  ^r***  ••^"*'  "'••  io*'i^P"' 
All  iKii  iklll  haFp  tou  nn  fo«(  quiil 

ZvtttthtlKtt  is  M  'hiltiinging,  pitcriiif:  ifjifeniu''  gsm*  lof  ih"  I 
|M  «5, 


GAUVCnC  FRONTIER 

ExcJting  space  ex  ploraifon  game  for  the  C64  Search  for  life 
lofms  among  the  200  brllon  stars  in  our  galaxy.  Scien- 
liftcally  accurate.  Awesonre  graphics^  Fof  the  serKxis  stu- 
befil  of  astronomy  or  the  casual  explorer  who  warns  to 
boldly  go  wherg  no  man  has  gone  belore.  Only  S29.g5! 


SUPER  B\KB 

Action- packed,  Jun-lilted  motor  cycle  afcade  game  for  ttw 
C64.  Race  the  clock  in  Moiocross.  Enduro.  Supefcross  or 
Tnals.  Fly  through  the  air  on  spectacular  jumps.  Bounce 
owf  woop-de-doos.  Avoid  logs,  trees,  wate*  holes,  bnck 
w^ls.  othef  tJike^Sn  etc  as  you  v\e  lor  the  gold  cup. 
Thritlrng  Super  Bike  actitw  for  only  S19.9S.  


UimA  DOS  unUTIES 

High  Speed  Hard  Onve  or  dual  iw^PV  driwB  bac  It  up  utit'ttytoi  Ihe  Amiga 
500. 1 000  01  2000.  51 ZK  Amiga  requirwJ  Compaiiljifl  with  any  Hard 
tkT<m  ttm  Hollows  convenliorhai  AmigaDOS  protocol  BKhup  ffuse 
valuable  dies  on  ycxjr  Hard  Diah  the  eAsy  way  lor  only  tSB.ftSf 


Order  wHh  dieck.  money  ofdar,  VISA,  MasterCard, 
COD.  Fr««  shipping  &  hsndUng  on 

US.  Canadian.  APO,  FPO  Ofders.  COO 
&  Foreign  Ofdef s  add  S4  00. 

Order  from: 

FREE  SPIRrr  SOFTWARE^  INC. 

905  W.  Hillgrove,  Suite  6 

LaGrange.  IL  60525 

(312)352-7323 


The  New,  Improved 
Bubble  Sort 


//  you  dismissed  the  bubble  sort  as 
slow  and  old  fashioned,  you  were 
right.  But  that  was  the  bubble  sort 
before  Butterfield.  In  this  article,  Jim 
blows  the  dust  off  this  old  sorting 
method  and  teaches  it  some  powerful 
new  tricks. 


Recently,  I  was  writing  a  program 
that  needed  to  do  some  sorting.  A 
simple  sorting  method,  well  known 
to  beginners — the  bubble  or  ex- 
change sort — had  features  that  I 
liked,  but  it  became  slower  and 
slower  as  the  number  of  items  in- 
creased. My  problem  was  to  find  a 
way  to  modify  the  basic  bubble  sort 
to  make  it  faster.  In  this  article,  well 
examine  the  nature  of  the  bubble  sort 
and  explore  some  methods  to  im- 
prove its  performance. 

The  Basic  Bubble 

The  idea  behind  a  bubble  sort  is 
quite  simple:  Sweep  through  the 
items,  comparing  each  adjacent 
pair.  If  you  find  a  pair  out  of  order, 
swap  them  and  continue  the  sweep. 
When  a  sweep  is  finished,  ask  your- 
self if  you  did  any  swaps  that  time. 
If  the  answer  is  yes,  do  the  sweep 
again.  If  the  answer  is  no,  you're 
finished — the  items  are  sorted. 

An  example  might  illustrate 
this  method.  Suppose  we  wish  to 
alphabetize  the  following  words: 

AN  APPLE  EACH  DAY  MAKES  THE 
DEALER  HAPPY 

Sweeping  from  left  to  right  {we 
could  go  either  way),  we  firet  com- 
pare AN  with  APPLE.  They're  in 
the  right  order,  so  we  move  on  to 
APPLE  and  EACH.  Still  OK,  but  the 


Jim  Butterfield 


next  pair  (EACH  and  DA^)  are  out 
of  order,  so  we  swap  them.  The 
next  comparison  will  be  between 
EACH  and  MAKES  (the  word 
EACH  has  moved,  remember),  and 
since  they're  OK,  we  move  along. 
Eventually,  our  first  sweep  yields: 

AN  APPLE  DjW  EACH  MAKES 
DEALER  HAPPY  THE 

The  highest  word,  THE,  has 
bubbled  up  to  the  top  of  the  list.  On 
the  next  sweep,  the  next  highest 
word,  MAKES,  will  bubble  to  the 
top.  You  can  see  where  the  name 
bubble  sort  comes  form. 

Problems 

Computer  scientists  do  not  think 
well  of  the  bubble  sort.  Most  simple 
sorting  methods  are  classified  as  JV 
Squared  sorts.  This  means  that  as 
you  double  the  number  of  items  to 
be  sorted,  the  time  required  to  do 
the  sort  is  increased  by  a  factor  of 
four.  Big  numbers  make  this  type  of 
sort  impractical — it  works  fine  on  a 
dozen  items,  but  it's  hopelessly 
slow  for  sorting  a  thousand. 

Here's  why:  A  bubble  sort 
compares  each  item  against  almost 
every  other  item.  If  we  had  a  dozen 
items,  we  might  need  to  make  up  to 
11  sweeps  through  the  data,  mak- 
ing 11  comparisons  on  each  sweep. 
Total  comparisons:  up  to  121.  We 
can  live  with  that,  but  the  arithme- 
tic shows  us  what  happens  when 
we  have  1000  units — 999  sweeps 
with  999  comparisons  each  makes 
it  obvious  that  timing  will  be  disas- 
trously slow. 

That's  why  computer  scientists 
have  come  up  with  a  number  of 
other   sorting   methods   that   will 


lessen  this  crushing  time  barrier. 
The  newer  generation  of  sorts  in- 
clude Quicksort  (generally  agreed 
to  be  fastest),  Heapsort,  and  Selec- 
tive Replacement.  The  number  of 
comparisons  made  by  these  sorting 
methods  will  grow  much  more 
slowly  as  the  data  increases.  They 
are  classified  as  N  LOG  N  sorts.  For 
a  dozen  items,  the  number  of  com- 
parisons required  might  be  about 
45.  Increasing  the  number  of  items 
to  1000  might  call  for  about  10,000 
comparisons.  That's  a  lot,  but  it's 
much  better  than  the  huge  numbers 
called  for  by  the  bubble  sort. 

Some  Pointers 

There's  another  criticism  of  the 
bubble  sort  that's  not  completely 
fair.  It's  said  that  the  bubble  sort 
moves  data  around  too  much.  Data 
movement  is  time-consuming  and 
may  cause  your  program  to  run 
afoul  of  the  dreaded  garbage  collec- 
tion problem,  which  is  a  major  time 
waster.  But  that  problem  is  easy  to 
eliminate  from  the  bubble  sort  or 
any  other  sort.  Here's  the  method; 
Instead  of  moving  the  data,  we 
move  an  index  that  points  to  the 
data.  We'll  use  this  method  in  our 
example  below. 

An  index  array  becomes  very 
useful  when  your  data  has  a  num- 
ber of  fields  in  each  record.  For  each 
record,  you  might  have  such  ele- 
ments as  date,  account,  and 
amount.  If  you  don't  use  an  index, 
you  have  to  move  the  data  itself, 
and  that  can  become  clumsy. 

Bubble  Advantages 

I  was  writing  an  accounting  pro- 
gram and  I  wanted  to  use  the  bub- 
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ble  sort  despite  its  slow  speed. 
Why?  Let  me  outline  some  of  the 
advantages  that  concerned  me. 

First,  the  bubble  sort  is  very 
good  on  items  that  are  almost  in  the 
correct  order  before  the  sort  starts. 
For  my  application,  the  accounting 
data  would  normally  have  been  en- 
tered in  order  by  date,  and  1  expect- 
ed that  many  of  the  sorted  reports 
would  still  be  at  least  partially  in 
chronological  order.  There  are 
many  other  types  of  sorts  that  de- 
rive no  advantage  from  a  nearly 
sorted  set  of  data,  but  the  bubble 
sort  might  straighten  things  out  in 
two  or  three  sweeps. 

Second,  the  bubble  behaves 
well  when  there  are  a  lot  of  "don't 
care"  situations  in  the  sorting  order. 
If  my  accounting  system  contained, 
say,  four  accounts  (auto,  food, 
house,  miscellaneous),  and  the  user 
wanted  to  sort  by  account,  there 
would  be  many  situations  where 
we  would  compare  similar  items 
(auto  versus  auto).  In  such  a  case, 
the  bubble  sort  would  just  skip 
along,  leaving  the  items  as  they 
were  found. 

Third,  I  wanted  to  use  a  sort  in 
which  output  could  take  place 
before  the  sort  was  finished.  I  was 
concerned  with  the  user's  percep- 
tion of  the  system  here.  Is  it  better 
to  vrait  for  a  full  sort — say,  five 
rninutes — with  nothing  happening 
on  the  screen?  Or  would  it  be  pref- 
erable to  have  the  first  item  printed 
out  in  30  seconds  or  so  with  the 
remaining  items  following  at  suit- 
able intervals?  You  can  argue  the 
point  either  way.  1  chose  the  latter. 

Reverse  Sweep  And  Flags 

It  doesn't  matter  if  you  sweep  from 
bottom  to  top  or  from  top  to  bot- 
tom. For  me,  the  top-down  method 
works  better,  since  each  sweep 
guarantees  at  least  one  new  item  to 
be  output  (the  next  lowest  item  will 
bubble  down  to  the  bottom). 

Here's  where  the  speed  im- 
provement comes  in.  Every  time  a 
swap  takes  place,  the  upper  item  is 
marked  as  having  been  moved  (a 
flag  is  set  on  that  item).  We  don't 
need  to  worry  about  marking  the 
lower  item:  We're  sweeping  in  a 
downward  direction  so  we'll  test 
that  against  something  new  almost 
immediately. 

On  the  next  sweep,  only  the 


items  that  have  moved  up  will  need 
to  be  tested  against  the  next  higher 
piece  of  data.  (If  an  item  moves  to 
the  top,  it  won't  need  this  kind  of 
test,  of  course).  So,  the  following 
sweep  will  compare  only  those 
items  that  need  it. 

An  example  should  clear 
things  up.  We'll  show  flagged  items 
in  uppercase.  At  the  beginning,  all 
items  are  flagged  (except  the  one  at 
the  top),  since  all  pairs  vdll  need  to 
be  compared. 

Here  we  go: 

AN  APPLE  EACH  DASf  MAKES  THE 
DEALER  happy 

Sweeping  from  the  top,  we 
compare  DEALER  with  HAPPY. 
No  swap  there,  so  we  keep  going, 
comparing  THE  with  DEALER. 
Yes:  We  swap  and  flag  the  higher 
value  (THE).  Completing  the 
sweep,  we  get: 

an  apple  day  EACH  dealer 
MAKES  THE  happy 

Note  the  flags.  The  words 
EACH,  MAKES,  and  THE  have 
moved  up,  and  they're  marked  as 
candidates  for  the  next  sweep.  Only 
these  three  words  vnll  be  compared 
with  the  words  above. 

By  the  way,  we  can  also  mark 
EACH  as  the  bottom  point  in  our 
next  sweep.  We'U  never  need  to  go 
below  this.  In  fact,  we  can  now 
output  the  words  AN,  APPLE,  and 
DAy — that  part  of  the  sort  is  now 
complete. 

Continuing  on  the  next  sweep, 
THE  and  HAPPY  are  out  of  order 
and  are  swapped.  MAKES  and 
HAPPY  are  also  out  of  order,  so  that 
exchange  takes  place,  also.  DEALER 
is  not  flagged,  so  it's  not  compared 
with  happy.  Instead,  we  move  on 
and  find  that  EACH  and  DEALER 
are  out  of  order.  The  result: 

an  apple  day  dealer  EACH 
happy  MAKES  the 

At  this  point,  we  know  that  the 
sort  is  complete  up  to  and  including 
the  word  DEALER.  In  fact,  the 
whole  sort  is  complete,  but  we 
don't  know  that  yet.  We'll  find  that 
out  when  we  make  the  last  two 
comparisons  (MABCES  versus  THE, 
and  EACH  versus  HAPPY). 

The  Program 

Below  is  a  simple  demonstration 
program  showing  the  method. 
Keep  in  mind  that  even  with  these 


revisions,  the  bubble  sort  is  not  in  a 
league  vrith  the  N  Log  N  sorting 
methods  mentioned  above.  It  does, 
however,  run  quite  a  bit  faster  than 
it  would  otherwise. 

The  program  invites  you  to  in- 
put a  number  of  names  (or  words). 
It  places  these  words  in  an  arriy  (or 
table)  called  N$.  In  a  practical  data 
processing  operation,  it's  likely  these 
names  would  be  input  from  a  file. 

At  line  1 80,  we  start  the  sort.  J 
tells  us  how  many  items  are  com- 
pletely sorted  (and  output)  so  far. 
Its  initial  value  is  0.  Lines  190-220 
build  the  index  array.  With  no  sort- 
ing information  so  far,  the  index  is 
simple:  The  first  item  will  be  1,  the 
next  will  be  2,  the  next,  3,  and  so  on. 

One  special  aspect  of  the  index 
array:  It  also  holds  the  flag  that  tells 
us  whether  or  not  a  value  needs  to 
be  compared  with  the  next  higher 
value.  It  does  this  by  taking  on  a 
negative  value.  At  the  start,  we 
want  to  compare  all  values  except 
the  top  one,  so  all  elements  of  array 
I  are  made  negative. 

Last  adjustment  before  we  go 
into  the  sort  proper:  When  we  do  a 
sweep,  how  far  down  should  we 
go?  Variable  J8  holds  this  value, 
and  at  the  beginning,  we  set  this  to 
value  1,  since  we  want  to  sweep  all 
the  way  down  the  first  time. 

Here,  we  are  at  line  240.  We'll 
come  back  here  to  start  a  new 
sweep.  Take  the  value  of  J8  and 
copy  it  to  J  7.  J8  will  be  set  above  the 
top  of  the  list.  As  we  sweep,  we'll 
update  it. 

The  loop  from  line  250  to  330 
performs  the  sweep  by  itself.  We're 
working  at  position  J9  in  the  index 
table.  From  this  table,  we  extract 
the  identity  of  the  actual  strings  to 
be  compared  from  positions  J9  and 
J9  +  1.  These  identity  numbers  are 
called  X2  and  J  3— but  wait— X2 
might  be  negative  (the  flag).  In- 
deed, we'll  only  do  the  comparison 
if  X2  IS  negative.  Let's  get  the  posi- 
tive value  by  using  the  absolute  value 
function,  ABS,  calling  the  result  J2. 

If  X2  is  positive,  we  don't  need 
to  do  a  comparison  and  can  skip  to 
the  NEXT  statement  at  line  330. 
Otherwise,  we  compare  items  J2 
and  J3.  If  they're  in  the  wrong 
order,  we  need  do  several  things. 
We  swap  the  index  entries  (not  the 
data),  remembering  to  flag  the  up- 
per value  by  making  it  negative. 
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And  we  note,  in  variable  ]8,  that  on 
the  next  sweep,  we  n\ust  conne 
down  at  least  this  far. 

After  completing  a  sweep,  we 
clear  the  flag  in  the  topmost  entry, 
again  using  the  ABS  function.  At 
this  point  we  would  expect  a  con- 
ventional bubble  sort  to  go  back  and 
do  another  sweep,  if  necessary.  Not 
this  one.  We'll  do  some  output  first. 

At  line  350,  we  allow  our  out- 
put pointer  (J)  to  almost  catch  up 
with  outsweep  pointer  (J8),  sending 
output  as  we  go.  We'll  always  out- 
put something  on  each  sweep. 
When  we've  caught  up  to  J8,  back 
we  go  to  do  another  sweep — unless 
we're  finished  and  have  already 
output  everything. 

Conclusion 

The  new,  improved  bubble  sort 
does  what  I  wanted  to  do  in  my 
program.  By  adding  extra  logic,  I 
was  able  to  reduce  the  long  sorting 
time  and  make  this  sort  practical  for 
my  application. 

Improved  Bubble  Sort  Demo 

For  instructions  on  entering  this  program, 
please  refer  to  "COMPUTE! 's  Guide  to  Typing 
In  Programs"  elsewhere  in  this  issue, 

100    REM    COPYRIGHT    1988    COMPUTE 

i    PUBL.,     INC.    — -   ALL   RIGHTS 
RESERVED 
110   PRINT    "NEW,     IMPROVED   BUBBL 

E    SORT" 
120   PRINT: INPUT    "HOW  MANY  NAME 

S";H 
125    DIM    1(H), N5(H) 
130    FOR   J=l    TO   H 
140    PRINT    "KAME";J; 
150    INPtfT    N?  (J) 
160    HEXT    J 
170    PRINT  :  PRINT "  HERE    COMES    A    S 

ORTED  LIST" 
180  J=0 

190    FOR   J9=l    TO  H 
200   I(J9)=-J9 
210    KEXT 
220    I(H)=H 
230   J8=l 

240   J7=cr8:  J8=H+1 
2  50    FOR   J9=H-1    TO    J 7    STEP    -1 
260    X2=ICJ9) 
270   J2=ABS(X2) 
280    I(J9)=J2 
290  J3=I(J9+1 ) 
300    IF    X2>0    GOTO    330 
310    REM    COMPARE    ITEMS    J2    AND   J 

3 
320   IF   N$(J2)>N${J3)   THEN   J8=J 

9+l:I(J9)^3:I{J9+l  )=-J2 
330    NEXT    J9 
340    ICH)=ABS(I(H)) 
350    JKJ-l-1:  J1=J0:  J0=I{J) 
360    PRINT   N?  (J0) 
370    IF    J+KJ8   GOTO    350 
380    IF   J<H    GOTO    240  (Q 
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COMPUTE! 's  Guide 

To  Typing  in  Programs 


Computers  are  precise — type  the  pro- 
gram exactly  as  listed,  including  neces- 
sary punctuation  and  symbols,  except 
for  special  characters  noted  below.  VVe 
have  provided  a  special  listing  conven- 
tion as  well  as  a  set  of  programs  to 
check  your  typing — "The  Automatic 
Proofreader." 

Programs  for  the  IBM  and  those  in 
ST  BASIC  for  Atari  ST  models  should 
be  typed  exactly  as  listed;  no  special 
characters  are  used.  Programs  for  Com- 
modore, Apple,  and  Atari  400/800/ 
XL/XE  computers  may  contain  some 
hard-to-read  special  characters,  so  we 
have  a  listing  system  that  indicates 
these  control  characters.  You  will  find 
these  characters  in  curly  braces;  do  not 
type  the  braces.  For  example,  {CLEAR} 
or  {CLR}  instructs  you  to  type  the  char- 
acter which  dears  the  screen  on  the 
Atari  or  Commodore  machines.  A  com- 
plete list  of  these  symbols  is  shown  in 
the  tables  below.  For  Commodore,  Ap- 
ple, and  Atari,  a  single  symbol  by  itself 
within  curly  braces  is  a  control  key  or 
graphics  key.  If  you  see  {A},  hold  down 
the  CONTROL  key  and  press  A.  This 
will  produce  a  reverse  video  character 
on  the  Commodore  (in  quote  mode),  a 
graphics  character  on  the  Atari,  and  an 
invisible  control  character  on  the  Apple. 

For  Commodore  computers,  graph- 
ics characters  entered  with  the  Commo- 
dore logo  key  are  enclosed  in  a  special 
bracket:  [<A>].  In  this  case,  you  would 
hold  down  the  Commodore  logo  key  as 
you  type  A.  Our  Commodore  listings 
are  in  uppercase,  so  shifted  symbols  are 
underlined.  A  graphics  heart  symbol 
(SHIFT-S)  would  be  listed  as  S.  One 
exception  is  {SHIFT-SPACE}.  When 
you  see  this,  hold  down  SHIFT  and 
press  the  space  bar.  If  a  number  pre- 
cedes a  symbol,  repeat  the  character  the 
indicated  number  of  times.  For  example, 
{5  RIGHT},  {6  5},  and  [<8  Q>], 
mean,  respectively,  that  you  should  en- 
ter five  cursor  rights,  six  shifted  S's,  and 
eight  Commodore-Q's.  On  the  Atari, 
inverse  characters  (white  on  black) 
should  be  entered  with  the  inverse  vid- 


Atari  400/800/XL/XE 


When  you  see 

tCLEAR> 

CUP> 

{DOWN} 

{LEFT> 

tRISHT} 

CBACK  SJ 

{DELETE! 

{INSERT} 

{DEL  LINEJ 

{INS  LINE} 

{TAB> 

<CLR  TAB> 

{SET  TAB> 

{BELLI 

{ESO 


Type 


ESC 
ESC 
ESC 
ESC 
ESC 
ESC 
ESC 
ESC 
ESC 
ESC 
ESC 
ESC 
ESC 
ESC 
ESC 


SHIFT  < 
CTRL  - 
CTRL  = 
CTRL  + 
CTRL  * 
DELETE 
CTRL  DELETE 
CTRL  INSERT 
SHIFT  DELETE 
SHIFT  INSERT 
TAB 

CTRL  TAB 
SHIFT  TAB 
CTRL  2 
ESC 


See 

* 

•t- 

-» 

i 

U 

U 

□ 

□ 

Q 

a 

Q 


Clear  Screen 
Cursor  Up 
Cursor  Down 
Cursor  Left 
Cursor  Right 
Backspace 
Delete  character 
Insert  character 
Delete  line 
Insert  line 
TAB  key 
Clear  tab 
Set  tab  stop 
Ring  buzzer 
ESCape  key 


Commodore  PET/CBM/ VIC/64/1 28/1 6/+4 


When  You 
Read: 

(CLR) 

(HOME) 

{UPI 

{DOWN} 

jLEFT! 

{RIGHT} 

{RVS} 

(OFF} 

{BLKj 

{WHT} 

(RED) 

{CYN} 

{PUR} 

{GRN} 

{BLUJ 

{YEL) 


Press: 


ISHHT 

1 

CLR/HOME 

CLR/HOME  1 

SHUT 

t  CRSR  I    j 

]  CItSR  I 

I  SHIFT  I  I*- CRSR— I 


*-CRSR  — 


CTRL 


!  CTRL 


CTRL 

1 

CTRL 

2 

See: 


a 
m 


m 
m 


CTRL 

5 

CTRL 

6 

CTRL 

7 

CTRL 

S 

D 

Q 

SO 


WhenYbu 
Read: 

gig 

{  Fl  } 
{  F2  } 

{F3) 
{  W  } 
{FS  ! 
{»} 
{f7} 
{  F8  } 
* 


Press: 

iC0MM0P0REJ[T] 

commodore]  |T] 


commodore]  [T] 


commodore]  [7] 
commodore]  jT] 

s 


See; 

D 


Cs3 


commodore 


II 


commodore 


an 


commodore 


n 

SHIFT 

fl 

(3 

SHIFT 

f3 

S 

SfflFf 


I  SHIFT 


Z] 
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eo  key  (Atari  logo  key  on  400/800 
models). 

Whenever  more  than  two  spaces 
appear  in  a  row,  they  are  listed  in  a 
special  format.  For  example,  {6 
SPACES}  means  press  the  space  bar  six 
times.  Our  Commodore  listings  never 
leave  a  single  space  at  the  end  of  a  line, 
instead  moving  it  to  the  next  printed 
line  as  {SPACE}. 

Amiga  program  listings  and  Atari 
ST  program  listings  in  GFA  BASIC  con- 
tain only  one  special  character,  the  left 
arrow  (-)  symbol.  This  character  marks 
the  end  of  each  program  line.  Wherever 
you  see  a  left  arrow,  press  RETURN  to 
enter  that  line  into  memory.  (For  the 
Amiga,  you  can  also  enter  the  line  sim- 
ply by  moving  the  cursor  off  the  line.) 
Don't  try  to  type  in  the  left  arrow  sym- 
bol; it's  there  only  as  a  marker  to  indi- 
cate where  each  program  line  ends. 

The  Automatic  Proofreader 

Type  in  the  appropriate  program  listed 
below,  then  save  it  for  future  use.  The 
Commodore  Proofreader  works  on  the 
Commodore  128,  64,  Plus/4,  16,  and 
VlC-20.  Don't  omit  any  lines,  even  if 
they  contain  unfamiliar  commands  or 
you  think  they  don't  apply  to  your  com- 
puter. When  you  run  the  program,  it 
installs  a  machine  language  program  in 
memory  and  erases  its  BASIC  portion 
automatically  (so  be  sure  to  save  sever- 
al copies  before  running  the  program 
for  the  first  time).  !f  you're  using  a 
Commodore  128,  Plus/4  or  16,  do  not 
use  any  GRAPHIC  commands  while 
the  Proofreader  is  active.  You  should 
disable  the  Commodore  Proofreader 
before  running  any  other  program.  To 
do  this,  either  turn  the  computer  off  and 
on  or  enter  SYS  64738  (for  the  64),  SYS 
65341  (128),  SYS  64802  (VIC-20},  or 
SYS  65526  {Plus/4  or  16).  To  reenable 
the  Proofreader,  reload  the  program 
and  run  it  as  usual.  Unlike  the  original 
VIC/64  Proofreader,  this  version  works 
the  same  with  disk  or  tape. 

The  IBM  Proofreader  is  a  BASIC 
program  that  simulates  the  IBM  BASIC 
line  editor,  letting  you  enter,  edit,  list, 
save,  and  load  programs  that  you  type. 
Type  RUN  to  activate.  Be  sure  to  leave 
Caps  Lock  on,  except  when  typing  low- 
ercase characters. 

On  the  Atari,  run  the  Proofreader 
to  activate  it  (the  Proofreader  remains 
active  in  memory  as  a  machine  lan- 
guage program);  you  must  then  enter 
NEW  to  erase  the  BASIC  loader.  Press- 
ing SYSTEM  RESET  deactivates  the 
Atari  Proofreader;  enter  PRINT  USR 
(1536)  to  reenable  it. 

The  Apple  Proofreader  erases  the 
BASIC  portion  of  itself  after  you  run  it, 
leaving  only  the  machine  language  por- 
tion in  memory.  It  works  with  either 


DOS  3.3  or  ProDOS,  Disable  the  Apple 
Proofreader  by  pressing  CTRL-RESET 
before  running  another  BASIC  program. 

Once  the  Proofreader  is  active,  try 
typing  in  a  line.  As  soon  as  you  press 
RETURN,  either  a  hexadecimal  number 
(on  the  Apple)  or  a  pair  of  letters  (on  the 
Commodore,  Atari,  or  IBM)  appears. 
The  number  or  pair  of  letters  is  called  a 
checksum. 

Compare  the  value  displayed  on 
the  screen  by  the  Proofreader  with  the 
checksum  printed  in  the  program  list- 
ing in  the  magazine.  The  checksum  is 
given  to  the  left  of  each  line  number. 
Just  type  in  the  program  a  line  at  a  time 
(without  the  printed  checksum),  press 
RETURN  or  Enter,  and  compare  the 
checksums.  If  they  match,  go  on  to  the 
next  line.  If  not,  check  your  typing; 
you've  made  a  mistake.  Because  of  the 
checksum  method  used,  do  not  type 
abbreviations,  such  as  ?  for  PRINT.  On 
the  Atari  and  Apple  Proofreaders, 
spaces  are  not  counted  as  part  of  the 
checksum,  so  be  sure  you  type  the  right 
number  of  spaces  between  quote 
marks.  The  Atari  Proofreader  does  not 
check  to  see  that  you've  typed  the  char- 
acters in  the  right  order,  so  if  characters 
are  transposed,  the  checksum  still 
matches  the  listing.  The  Commodore 
Proofreader  catches  transposition  er- 
rors and  ignores  spaces  unless  they're 
enclosed  in  quotation  marks.  The  IBM 
Proofreader  detects  errors  in  spacing 
and  transposition. 

IBM  Proofreader  Commands 

Since  the  IBM  Proofreader  replaces  the 
computer's  normal  BASIC  line  editor,  it 
has  to  include  many  of  the  direct-mode 
IBM  BASIC  commands.  The  syntax  is 
identical  to  IBM  BASIC.  Commands 
simulated  arc  LIST,  LLIST,  NEW, 
FILES,  SAVE,  and  LOAD.  When  Usting 
your  program,  press  any  key  (except 
Ctrl-Break)  to  stop  the  listing.  If  you 
enter  NEW,  the  Proofreader  prompts 
you  to  press  Y  to  be  especially  sure  you 
mean  yes. 

Two  new  commands  are  BASIC 
and  CHECK.  BASIC  exits  the  Proof- 
reader back  to  IBM  BASIC,  leaving  the 
Proofreader  in  memory.  CHECK  works 
just  like  LIST,  but  shows  the  checksums 
along  with  the  listing.  After  you  have 
typed  in  a  program,  save  it  to  disk. 
Then  exit  the  Proofreader  with  the 
BASIC  command,  and  load  the  pro- 
gram as  usual  (this  replaces  the  Proof- 
reader in  memory).  You  can  now  run 
the  program,  but  you  may  want  to  re- 
save  it  to  disk.  This  will  shorten  it  on 
disk  and  make  it  load  faster,  but  it  can 
no  longer  be  edited  with  the  Proofread- 
er. If  you  want  to  convert  an  existing 
BASIC  program  to  Proofreader  format, 
save  it  to  disk  with  SAVE  "filename", A. 


Program  1 :  Atari  Proofreader 

By  Charles  Brannon 

100    BRAPHICS  0 

110  FOR  1=1536  TO  1700;RE 

AD  AsPOKE  I,AiCK-CK+A 

I  NEXT  I 
120  IF  CKO19072  THEN  ?  " 

Error  in  DATA  Stateme 

nts.   Check  Typing."! 

END 
130  A-USR(1536) 
140  ?  ;7  "Automatic  Proof 

reader  Now  Activated. 

li 

1S0  END 

160  DATA  104,160,0,185,26 

,3,201 , 69,240,7 
170  DATA  200,200,192,34,2 

08,243,96,200, 169,74 
1B0  DATA  153,26,3,200,169 

,6, 153,26,3, 162 
190  DATA  0,189,0,228,157, 

74,6, 232,224, 16 
200  DATA  208,245,169,93,1 

41,70, 6, 169,6, 141 
210  DATA  79,6,24,173,4,22 

8, 105, 1, 141,95 
220  DATA  6,173,5,228,105, 

0, 141,96,6, 169 
230  DATA  0,133,203,96,247 

, 238, 125, 241 , 93,6 
240  DATA  244,241,113,241, 

124,241,76,205,238 
250  DATA  0,0,0,0,0,32,62, 

246,8,201 
260  DATA  155,240,13,201,3 

2,240,7,72,24, 101 
270  DATA  203,133,203,104, 

40,96,72, 152, 72, 13B 
280  DATA  72,160,0,169,128 

,  143, 88,200,  192,40 
290  DATA  208,249,165,203, 

74,74,74, 74,24, 105 
300  DATA  161,160,3,145,88 

,  163,203,41,  15,24 
310  DATA  105,161,200,145, 

88, 169,0, 133,203, 104 
320  DATA  170,104,168,104, 

40,  96 

Program  2:  Commodore 
Proofreader 

By  Philip  Nelson 

10  VEC=PEEK(772)+256*PEEK(773) 

:LO=43:HI=44 
20  PRINT  "AUTOMATIC  PROOFREADS 

R  FOR  ";!IF  VEC=42364  THEN 

{space] PRIHT  "C-64" 
30  IF  VEC=S0556  THEN  PRINT  "VI 

C-20" 
40  IF  VEC-3S158  THEN  GRAPHIC  C 

LR:  PRINT  "PLUS/4  5.  16" 
50  IF  VEC=17X65  THEN  L0=45:HI= 

46:GRAPHIC  CLR:PRINT"128" 
60  SA=(PEEK(L0)+256*PEEK(HI))+ 

6:ADR=SA 
70  FOR  J=0  TO  166:READ  BYT:POK 

E  ADR, ByTsADR=ADR+liCHK=CHK 

+BYT:NEXT 
80  IF  CHKO20570  THEN  PRINT  "* 

ERROR*  CHECK  TYPING  IN  DATA 
STATEMENTS": END 
90  FOR  J=l  TO  5:READ  RF,LF,HF: 

RS=SA+RF :HB=INT ( RE /256 ) : LB= 

RS-(256*HB) 
100    CHK=CHK+RF+LF+HF:POKE    SA+L 

F.LBrPOKE    SA+HF , HB : NEXT 
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110  IF  CHKO220S4  THEN  PRINT  " 

♦ERROR*  RELOAD  PROGRAM  AND 

( SPACE jCHECK  FINAL  LINE": EN 

D 
120  POKE  SA+149, PEEK ( 772 ): POKE 

SA+150,PEEK(773) 
130  IF  VEC=17165  THEN  POKE  SA+ 

14, 22s POKE  SA+16,23:POKESA+ 

29 , 224 : POKESA+139 , 224 
140  PRINT  CHR$(147};CHR?(17),-" 

PROOFREADER  ACTIVE";  SYS  SA 
150  POKE  HI,PEEK(HI)+1:P0KE  (P 

EEK(LO)+256*PEEK(HI))-1,0:N 

EW 
160  DATA  120,169,73,141,4,3,16 

9,3,141,5,3 
170  DATA  88,96,165,20,133,167, 

165,21,133,168,169 
180  DATA  0,141,0,255,162,31,18 

1,199,157,227,3 
190  DATA  202,16,248,169,19,32, 

210,255,169,18,32 
200  DATA  210,255,160,0,132,180 

,132,176,136,230,180 
210  DATA  200,185,0,2,240,46,20 

1,34,208,8,72 
220  DATA  165,176,73,255,133,17 

6,104,72,201,32,208 
230  DATA  7,165,176,206,3,104,2 

08,226,104,166,180 
240  DATA  24,165,167,121,0,2,13 

3,167,165,168,105 
250  DATA  0,133,168,202,208,239 

,240,202,165,167,69 
260  DATA  168,72,41,15,168,185, 

211,3,32,210,255 
270  DATA  104,74,74,74,74,168,1 

85,211,3,32,210 
280  DATA  255,162,31,189,227,3, 

149,199,202,16,248 
290  DATA  169,146,32,210,255,76 

,86,137,65,66,67 
300  DATA  68,69,70,71,72,74,75, 

77,80,81,82,83,88 
310  DATA  13,2,7,167,31,32,151, 

116,117,151,128,129,167,136 

,137 

Program  3:  IBM  Proofreader 

By  Charles  Brannon 

10    'Automatic    Proof reader   Ver 

si  on   3.0    (Lines   205,20£i   ad 

ded/190    deleted/470,490    ch 

anged    -from    V2.0> 

100    DIM   L*<500) ,LNUM(500)!COL 

DR    0,7, 7: KEY    DFF:CLS:MAX= 

0:LNUM(0)=6553t! 
110  DN  ERROR  GOTO  120: KEY  15, 

CHR»{4}+CHR*(70)sON  KEYCt 

5>  BOSUB  640: KEY  <1S)  ON: 

QDTQ  130 
120  RESUME  130 

130  DEF  SEG=8<H40:W=PeEK:(SiH4fl) 
140  ON  ERROR  BOTO  6S0:PRINT:P 

RINfRroo-f reader  Ready." 
150  LINE  INPUT  L«:Y=CSRLIN-IN 

T(LEN(L«)/W)~l! LOCATE  Y, 1 
160  DEF  SEG=0:POKE  1050, 30: PO 

KE  1052, 34: POKE  1054, 0:PO 

KE  1055,79:POKE  1056, 13!P 

OKE  1037, 28: LINE  INPUT  L« 

sDEF  SEG: IF  L»-""  THEN  15 

0 
170  IF  LEFT»(L», 1)="  "  THEN  L 

*=MID«(L»,2):S0T0  170 
1S0  IF  VAL<LEFT»(L*,2) )=0  AND 
MID* (L», 3, 13="  "  THEN  L* 

=MID»(L»,4) 
200  IF  ASC(L«)>57  THEN  260  'n 

D   line   nufliber,    tharefore 

command 


203  BL=INSTR(L», "  "):IF  BL=0 
THEN  BL«-L«:GOTO  206  ELSE 
BL*-LEFT»  i L» , BL-1 ) 

206  LNUM=VAL <BL*):TEXT»=MID»( 
L« , LEN ( STR»  <  LNUM) >  + 1 ) 

210  IF  TEXT«=""  THEN  QOSUB  54 
0:IF  LNUM-LNUM<P)  THEN  BO 
SUB  S60:GOTO  1S0  ELSE  iS0 

220  CKSUM=0:FOR  1=1  TO  LEN(L» 
)  :  CKSUM»=  (CKSUM+ASC  (MID*  (L 
*,I))»I)  AND  255;NEXT;L0C 
ATE  Y,l: PRINT  CHR«{65+CKS 
UM/ 1 6 ) +CHRt ( 65+ ( CKSUM  AND 
15))+"  "+L» 

230  BOSUB  540: IF  LNUn(P)=LNUM 
THEN  L«(P)'=TEXT»tB0T0  15 
0  'replace  line 

240  BOSUB  580: BOTO  150  'insar 
t  tha  I  ins 

260  TEXT«=""!FDR  1=1  TO  LENCL 
•) ! A-ASC (MID» (L», I ) ) : TEXT 
♦-TEXT*+CHR*<A+32«(A>96  A 
ND  A<123)) :NEXT 

270  DELIMITER=INSTR(TEXT»,"  " 
) sCOMMAND»=TEXT*!ARG«=""t 
IF  DELIMITER  THEN  COMMAND 
•-LEFT»<TEXT«,DELIMITER-1 
) :AR0«"MID»(TEXT«,  DELIMIT 
ER+1)  ELSE  DELIMITER=INST 
R<TeXT»,CHR*<34) ) :IF  DELI 
MITER  THEN  COMMAND»=LEFT* 
<TEXT*, DELIMlTER-1 ) : AR0«= 
MID$ (TEXT*, DELIMITER) 

280  IF  COMMAND»<>"LIST"  THEN 
410 

290  OPEN  "scrn:"  FOR  OUTPUT  A 
S  ttl 

300  IF  AR6«=""  THEN  FIRST=0:P 
E+lAX-lieOTO  340 

310  DELimTER=INSTRCARQ*,"-"> 
sIF  DELIMITER=0  THEN  LNUM 
"VAL ( ARG« ) : QOSUB  540 : F I RS 
T-PtGOTO  340 

320  FIRST=VAL CLEFT* (ARB», DELI 
MITER) ) 8LAST=VAL(MID»(ARB 
*,DELIMITER+1)) 

330  LNUM=FIRST: BOSUB  540:FIRS 
T-Pf  LNUM-LASTt  BOSUB  540 1 1 
F  P-0  THEN  P-MAX-1 

340  FOR  X=FIRST  TO  P:N«=MID«( 
STR»<LNUM(X)>,2)+"  " 

350  IF  CKFLAB-0  THEN  A*""":QO 
TO  370 

360  CKSUM-0:A»-N*+L*(X):FOR  I 
-1  TO  LEN<A«) :CKSUM»ICK9U 
M+ASC(MID«(A*,I)}tI)  AND 
233; NEXT: A«»CHR*  C65+CKSUM 
/ 16) +CHR»<65+ (CKSUM  AND  1 
5))+"  ■• 

370  PRINT  «1,A»+N*+L*<X) 

380  IF  INKEY»<>""  THEN  X-P 

390  NEXT  : CLOSE  »1:CKFLAG=0 

400  BOTO  130 

410  IF  CaMMAND*="LLIST"  THEN 
OPEN  "Iptlj"  FOR  OUTPUT  A 
S  tfliBOTO  300 

420  IF  CQMMAND«=" CHECK"  THEN 
CKFLAG-lsGOTO  290 

430  IF  COMMAND»<>"SAVE"  THEN 
430 

440  SOSUB  600: OPEN  ARO»  FDR  0 
UTPUT  AS  #l!ARa*«=""jBDTO 
300 

450  IF  COMMAND«<>"LOAD"  THEN 
490 

460  GOSUB  600: OPEN  ARS*  FOR  I 
NPUT  AS  #1:MAX»0:P=0 

470  WHILE  NOT  E0F(1):LINE  INP 
UT  #1,L»:BL»IN3TR(L»,"  ") 
s  BL*»LEFT» (L*, BL-1 ) : LNUM ( 
P>=VAL (BL»> I L* (P>  =H1D* (L» 


,LEN (STR* ( VAL (BL*) ) ) +1 )  I P 

=P+l!WEND 
480  MA X=P: CLOSE  #1:B0TD  130 
490  IF  C0MMAND*="NEW"  THEN  IN 

PUT  "Erasa  program  -  Ara 

yoLi  siire";L«:IF  LEFT»<L*, 

l)-"y"  OR  LEFT*(L»,  1)"="Y" 
THEN  MAX=0: LNUM (0> =65536 

!:GOTO  1301  ELSE  130 
500  IF  CaMMAND*="BASIC"  THEN 

COLOR  7, 0,0; ON  ERROR  BOTO 
0:CLS:END 
510  IF  COMMAND»<> "FILES"  THEN 

520 
515  IF  AR6*=""  THEN  ARS»="A: " 

ELSE  SEL=1:GDSUB  600 
517  FILES  ARB*:BaTQ  130 
520  PRlNT"Syntax  error": BOTO 

130 
540  P=0: WHILE  LNUM>LNUM<P)  AN 

D  P<MAX I P=P+l:WENDi RETURN 
560  MfiX=MAX-l:FaR  X=P  TO  MAX: 

LNUM<X>=LNUM(X+n :L»<X)=L 

*(X+1) :NEXT:RETURN 
580  MAX=MftX+l:FaR  X=MAX  TO  P+ 

1  STEP  -l!LNUM(X)=LNUM(X- 

1 ) : L* ( X ) =L* ( X-1 ) : NEXT:  L» ( 

P) =TEXT«: LNUM  tP) =LNUM: RET 

URN 
600  IF  L£FT»(ARG»,1)<>CHR»(34 

)  THEN  520  ELSE  AftB»-MID» 

(ARB*,2) 
610  IF  RI6HT»(ARB*,1)=CHR»{34 

)  THEN  ARG«-LEFT*(ARB*,LE 

N(ARQ»)-1) 
620  IF  SEL=0  AND  INSTR(ARB*," 

.'•)-0  THEN  ARe«-ARB»+">BA 

S" 
630  SEL=0: RETURN 
640  CLOSE  #ltCKFLAG=0;PRINT"S 

topped. "! RETURN  150 
650  PRINT  "Error  tt";ERR:RESUM 

E  150 

Program  4:  Apple 
Proofreader 

By  Tim  Victor,  Editorial 
Programmer 

10  C  =  0:  FOR  I  =  768  TO  768 

+  68:  READ  A:C  =  C  +  A:  PO 

KE  I, A:  NEXT 
20  IF  C  <  >  7258  THEN  PRINT  " 

ERROR  IN  PROOFREADER  DATA 

STATEMENTS":  END 
30  IF  PEEK  (190  «  256)  <  >  76 
THEN  POKE  56,0:  POKE  57,3 

:  CALL  1002:  GOTO  50 
40  PRINT  CHR*  (4) ;"IN#A*300" 
50  POKE  34,0:  HOME  :  POKE  34, 

1:  VTAB  2t  PRINT  "PRDOFREA 

DER  INSTALLED" 
60  NEU 
100  DATA  216,32,27,253,201,14 

i 
110  DATA  208,60,138,72,169,0 
120  DATA  72,189,255,1,201,160 
130  DATA  240,8,104,10,125,255 
140  DATA  1,105,0,72,202,208 
150  DATA  238,104,170,41,15,9 
160  DATA  48,201,58,144,2,233 
170  DATA  57,141,1,4,138,74 
1B0  DATA  74,74,74,41,15,9 
190  DATA  48, 201 ;58, 144, 2,  233 
200  DATA  57,141,0,4,104,170 
210  DATA  169,141,96 


J 
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MLX 


Machine  Language  Entry  Program 
For  Commodore  64 


Ottis  CcMper 


"MLX"  is  a  labor-saving  utility  that  allows 
almost  fail-safe  entry  of  Commodore  64 
machine  language  programs. 


Type  in  and  save  some  copies  of  MLX — 
you'll  want  to  use  it  to  enter  future  ma- 
chine langauge  (ML)  programs  from 
COMPUTE!,  When  you're  ready  to  enter 
an  ML  program,  load  and  run  MLX.  It 
asks  you  for  a  starting  address  and  an 
ending  address.  These  addresses  appear 
in  the  article  accompanying  the  MLX- 
format  program  listing  you're  typing. 

If  you're  unfamiliar  with  machine 
language,  the  addresses  (and  all  other 
values  you  enter  in  MLX)  may  appear 
strange.  Instead  of  the  usual  decimal 
numbers  you're  accustomed  to,  these 
numbers  are  in  hexadecimal — a  base  16 
numbering  system  commonly  used  by 
ML  programmers.  Hexadecimal — ^hex 
for  short — includes  the  numerals  0-9 
and  the  letters  A-F.  But  don't  worry — 
even  if  you  know  nothing  about  ML  or 
hex,  you  should  have  no  trouble  using 
MLX. 

After  you  enter  the  starting  and  end- 
ing addrewes,  you'll  be  offered  the  op- 
tion of  clearing  the  workspace.  Choose 
this  option  if  you're  starting  to  enter  a 
new  listing.  If  you're  continuing  a  listing 
that's  partially  typed  from  a  previous 
session,  don't  choose  this  option. 

A  functions  menu  will  appear.  The 
first  option  in  the  menu  is  ENTER 
DATA.  If  you're  just  starting  to  type  in  a 
program,  pick  this.  Press  the  E  key,  and 
type  the  first  number  in  the  first  line  of 
the  program  listing.  If  you've  already 
typed  in  part  of  a  program,  type  the  line 
number  where  you  left  off  typing  at  the 
end  of  the  previous  session  (be  sure  to 
load  the  partially  completed  program 
before  you  resume  entiy).  In  any  case, 
make  sure  the  address  you  enter  corre- 
sponds to  the  address  of  a  line  in  the 
listing  you  are  entering.  Otherwise,  you'll 
be  unable  to  enter  the  data  correctly.  If 
you  pressed  E  by  mistake,  you  can  return 
to  the  command  menu  by  pressing  RE- 
TURN alone  when  asked  for  the  address. 
(You  can  get  back  to  the  menu  from  most 
options  by  pressing  RETURN  vnih  no 
other  input.) 

Entering  A  Listing 

Once  you're  in  Enter  mode,  MLX  prints 
the  address  for  each  program  line  for 
you.  You  then  t3T3e  in  all  nine  numbers 
on  that  line,  beginning  with  the  first  two- 
digit  number  after  the  colon  (:).  Each  line 
represents  eigjit  data  bytes  and  a  check- 


sum. Although  an  MLX-format  listing 
appears  similar  to  the  "hex  dump"  list- 
ings from  a  machine  language  monitor 
program,  the  extra  checksum  number  on 
the  end  allows  MLX  to  check  your 
typing. 

When  you  enter  a  line,  MLX  recalcu- 
lates the  checksum  from  the  eight  bytes 
and  the  address  and  compares  this  value 
to  the  number  from  the  ninth  cotunm.  If 
the  values  match,  you'll  hear  a  bell  tone, 
the  data  will  be  added  to  the  workspace 
area,  and  the  prompt  for  the  next  line  of 
data  will  appear.  But  if  MLX  detects  a 
typing  error,  youTl  hear  a  low  buzz  and 
see  an  error  message.  The  line  will  then 
be  redisplayed  for  editing. 

Invalid  Characters  Banned 

Only  a  few  ke)^  are  active  while  you're 
entering  data,  so  you  may  have  to  un- 
learn some  habits.  You  do  not  type  spaces 
between  the  columns;  MLX  automatical- 
ly inserts  these  for  you.  You  do  not  press 
RETURN  after  typing  the  last  number  in 
a  line;  MLX  automatically  enters  and 
checks  the  line  after  you  type  the  last 
digit. 

Only  the  numerals  0-9  and  the  let- 
ters A-F  can  be  typed  in.  If  you  press  any 
other  key  (with  some  exceptions  noted 
below),  you'E  hear  a  warning  buzz.  To 
simplify  typing,  a  numeric  keypad  is  now 
incorporated  in  the  listing.  The  keypad  is 
active  only  while  entering  data.  Address- 
es must  be  entered  with  the  normal  letter 
and  number  keys.  The  figure  below 
shows  the  keypad  configurationi 
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MLX  checks  for  transposed  charac- 
ters. If  you're  supposed  to  type  in  AG  and 
instead  enter  OA,  MLX  will  catch'  your 
mistake.  There  is  one  error  that  can  slip 
past  MLX;  Because  of  the  checksum  for- 
mula used,  MLX  won't  notice  if  you  acci- 
dentally type  FF  in  place  of  00,  and  vice 


versa.  And  there's  a  very  slim  chance  that 
you  could  garble  a  line  and  still  end  up 
with  a  combination  of  characters  that 
adds  up  to  the  proper  checksum.  How- 
ever, these  mistakes  should  not  occur  if 
you  take  reasonable  care  while  entering 
data. 

Editing  Features 

To  correct  typing  mistakes  before  finish- 
ing a  line,  use  the  INST/DEL  key  to 
delete  the  character  to  the  left  of  the 
cursor,  (The  cursor-left  key  also  deletes,) 
If  you  mess  up  a  line  really  badly,  press 
CLR/HOME  to  start  the  line  over.  The 
RETURN  key  is  also  active,  but  only 
before  any  data  is  typed  on  a  line.  Press- 
ing RETURN  at  this  point  returns  you  to 
the  command  menu.  After  you  type  a 
character  of  data,  MLX  disables  RETURN 
until  the  cursor  returns  to  the  start  of  a 
line.  Remember,  you  can  press  CLR/ 
HOME  to  quickly  get  to  a  line  number 
prompt. 

More  editing  features  are  available 
when  correcting  lines  in  which  MLX  has 
detected  an  error.  To  make  corrections  in 
a  line  that  MLX  has  redisplayed  for  edit- 
ing, compare  the  line  on  the  SCTeen  with 
the  one  printed  in  the  listing,  then  move 
the  cursor  to  the  mistake  and  type  the 
correct  key.  The  cursor  left  and  right  keys 
provide  the  normal  cursor  controls.  (The 
INST/DEL  key  now  works  as  an  alterna- 
tive cursor-left  key.)  You  cannot  move 
left  beyopd  the  first  character  in  the  line. 
If  you  try  to  move  beyond  the  rightmost 
character,  you'll  reenter  the  Hne.  Ehuing 
editing,  RETURN  is  active;  pressing  it 
tells  MLX  to  recheck  the  line.  You  can 
press  the  CLR/HOME  key  to  clear  the 
entire  line  if  you  want  to  start  from 
scratch,  or  if  you  want  to  get  to  a  line 
number  prompt  to  use  RETURN  to  get 
back  to  the  menu. 

Display  Data 

The  second  menu  choice,  DISPLAY 
DATA,  examines  memory  and  shows  the 
contents  in  the  same  format  as  the  pro- 
gram listing  (including  the  checksum). 
When  you  press  D,  MLX  asks  you  for  a 
starting  address.  Be  sure  that  the  starting 
address  you  give  corresponds  to  a  line 
number  in  the  listing.  Otherwise,  the 
checksum  display  wUl  be  meaningless. 
MLX  displays  program  lines  until  it 
reaches  the  end  of  the  program,  at  which 
point  the  menu  is  redisplayed.  You  can 
pause  the  display  by  pressing  the  space 
bar.  (MLX  finishes  printing  the  current 
line  before  halting,)  Press  space  again  to 
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restart  the  display.  To  break  out  of  the 
display  and  get  back  to  the  menu  before 
the  ending  address  is  reached,  press 
RETURN. 

Other  Menu  Options 

Two  more  menu  selections  let  you  save 
programs  and  load  them  back  into  the 
computer.  These  are  SAVE  FILE  and 
LOAD  FILE;  their  operation  is  quite 
straightforward.  When  you  press  S  or  L, 
MLX  asks  you  for  the  filename.  You'U 
then  be  asked  to  press  either  D  or  T  to 
select  disk  or  tape. 

You'U  notice  the  disk  drive  starting 
and  stopping  several  times  during  a  load 
or  save.  Don't  panic;  this  is  normal  be- 
havior. MLX  opens  and  reads  from  or 
writes  to  the  file  instead  of  using  the 
usual  LOAD  and  SAVE  commands.  Disk 
users  should  also  note  that  the  drive 
pre0x  0:  is  automatically  added  to  the 
filename  (line  750),  so  this  should  not  be 
included  when  entering  the  name.  This 
also  precludes  the  use  of  @  for  Save- 
with-Replace,  so  remember  to  give  each 
version  you  save  a  different  name. 

Remember  that  MLX  saves  the  en- 
tire workspace  eirea  from  the  starting  ad- 
dress to  the  ending  address,  so  the  save 
or  load  may  take  longer  than  you  might 
expect  if  you've  entered  only  a  small 
amount  of  data  from  a  long  listing.  When 
saving  a  partially  completed  listing,  make 
sure  to  note  the  address  where  you 
stopped  typing  so  you'U  know  where  to 
resume  entry  when  you  reload. 

MLX  reports  the  standard  disk  or 
tape  error  messages  if  any  problems  are 
delected  during  the  save  or  load.  (Tape 
users  should  bear  in  mind  that  Commo- 
dore computers  are  never  able  to  detect 
errors  during  a  save  to  tape.)  MLX  also 
has  three  special  load  error  messages: 
INCORRECT  STARTING  ADDRESS, 
which  means  the  file  you're  trying  to 
load  does  not  have  the  starting  address 
you  specified  when  you  ran  MLX;  LOAD 
ENDED  AT  address,  which  means  the  file 
j^u're  trying  to  load  ends  before  the 
ending  address  you  specified  when  you 
started  MLX;  and  TRUNCATED  AT 
ENDEvJG  ADDRESS,  which  means  the 
file  you're  trying  to  load  extends  beyond 
the  ending  address  you  specified  when 
you  started  MLX.  If  you  see  one  of  these 
messages  and  feel  certain  that  you've 
loaded  the  right  file,  exit  and  rerun  MLX, 
being  careful  to  enter  the  correct  starting 
and  ending  addresses. 

The  QUIT  menu  option  has  the  ob- 
vious effect — it  stops  MLX  and  enters 
BASIC.  The  RUN/STOP  key  is  disabled, 
so  the  Q  option  lets  you  exit  the  program 
without  turning  off  the  computer.  (Of 
course,  RUN/STOP-RESTORE  also  gets 
you  out.)  You'D  be  asked  for  verification; 
press  Y  to  exit  to  BASIC,  or  any  other  key 
to  return  to  the  menu.  After  quitting,  you 


can  type  RUN  again  and  reenter  MLX 
without  losing  your  data,  as  long  as  you 
don't  use  the  dear  workspace  option, 

Ttie  Finished  Product 

When  you've  finished  typing  all  the  data 
for  an  ML  program  and  saved  your  work, 
you're  ready  to  see  the  results.  The  in- 
structions for  loading  and  using  the  fin- 
ished product  vary  from  program  to 
program.  Some  ML  programs  are  de- 
signed to  be  loaded  and  run  like  BASIC 
programs,  so  all  you  need  to  type  is 
LOAD  "filename",^  for  disk  or  LOAD 
"filename"  for  tape,  and  then  RUN.  Such 
programs  will  usually  have  a  starting 
address  of  0801  for  the  64,  Other  pro- 
grams must  be  reloaded  to  spedfic  ad- 
dresses with  a  command  such  as  LOAD 
"filename", 8,1  for  disk  or  LOAD  "file- 
name",l,l  for  tape,  then  started  with  a 
SYS  to  a  particular  memory  address.  On 
the  Commodore  64,  the  most  common 
starting  address  for  such  programs  is 
49152,  which  corresponds  to  MLX  ad- 
dress COOO.  In  either  case,  you  should 
always  refer  to  the  article  which  accom- 
paiues  the  ML  listing  for  information  on 
loading  and  running  the  program. 

An  Ounce  Of  Prevention 

By  the  time  you  finish  typing  in  the  data 
for  a  long  ML  program,  you  may  have 
several  hovns  invested  in  the  project. 
Don't  take  chances — use  our  "Automatic 
Proofreader"  to  type  the  new  MLX,  and 
then  test  your  copy  thoroughly  before  first 
using  it  to  enter  any  significant  amount  of 
data.  Make  sure  all  the  menu  options 
work  as  they  should.  Enter  fragments  of 
the  program  starting  at  several  different 
addresses,  then  use  the  Display  option  to 
verify  that  the  data  has  been  entered 
correctly.  And  be  sure  to  test  the  Save 
and  Load  options  several  times  to  ensure 
that  you  can  recall  your  work  from  disk 
or  tape.  Don't  let  a  simple  typing  error  in 
the  new  MLX  cost  you  several  hights  of 
hard  work. 


MLX  For  Commodore  64 

SS  10  REM  VERSION  .1.1.:  LINES  B 
30,950  MODIFIED,  LINES  4 
85-487  ADDED 
EK  .100  POKE  56,Sa:CLR:DIM  IN?, 

I,J,A,B,A$,B$,A{7),N5 
DM  .1.10  C4=4a!C6=.l6!C7=7:Z2=2:Z 

4=254 :Z5=255:Z6=256:Z7= 

.127 
CJ  120  FA=PEEK{45)+Z6*PEEK(46) 

jBS=PEEK(55)+Z6*PEEK(56 

) :H$="0123456789ABCDEF" 
SB  .130  R$=CHR$(13)  :L$="{LEFTj" 

:S$="  ■':D?=CHRS(20>!Z?  = 

CHR?(0) :T$="{13  RIGHT}" 
CQ  .140  SD=54272iF0R  I=SD  TO  SD 

+23: POKE  I , 0 sNEXTiPOKE 

{SPACE )SD+24,15tPOKE  78 

8,52 
FC  .150  PRINT"  {CLR}"CHR5(.\42)CH 

R5(8):POKE    53280, ISsPOK 


EJ    .160 


FR   170 


JB    180 


GF    190 


KR   200 


PG    210 


DR    220 


BD 

230 

JS 

240 

JH 

250 

HK 

260 

FD 

270 

EJ    280 


EM 
JX 

290 
30*0 

KF 

310 

PP 

320 

JA 

330 

GX 

CH 

340 
350 

RR   360 


BE 

370 

PX 

380 

JC 

390 

QS 

400 

EX 

410 

HD 

420 

JK 

430 

SK 

440 

E    53281,15 
PRINT    T5"     (RED){RVSJ 
{2    SPACES 1E8    @| 
{2    SPACES j"SPC( 28)" 
(2    SPACES} ( OFF i {BLU}    ML 
X    II    {RED)(RVS) 
(2    SPACES }"SPC( 28)" 
{12    SPACES) (BLU)" 
PRINT" (3    DOWNl 
{3    SPACES3C0MPUTE1 "S   MA 
CHINE    LASGOAGE    EDITOR 
{3    DOWN J" 

PRINT "{BLK} STARTING  ADD 
RESS  g4I " ; :GOSUB300 1 SA=A 
D:GOSUB1040!lP  F  THEN18 
0 

PRINT "{BLK} (2  SPACES)EN 
DING  ADDRESSS43"; jGOSUB 
300  sEA=ADtGOSUB1030  j IF 
{ SPACE }F  THEN190 
INPUT" {3  DOWNj {BLKJCLEA 
R  WORKSPACE  EY/N]64i";A 
5: IF  LEFT5(A|,1)<>"Y"TH 
EN220 

PRINT"{2  DOWN} {BLU} WORK 
ING . . . " ; :FORI=BS  TO  BS+ 
EA-SA+7SPOKE  1,0! NEXT iP 
RI NT  "DONE" 

PRIKTTAB(10)"{2    DOWN} 
{BLK}{RVS]    MLX    COMMAKD 
[SPACE }MENU     {down) £43": 
PRINT    T$"[RVS)EtOFF}NTE 
R   DATA" 

PRINT    T$"{RVS}DlOFF}lSP 
LAY    DATA" SPRINT    T?" 
{RVS}LlOPF)OAD    FILE" 
PRINT   T$"{RVS}S{OFF}AVE 

FILE"sPRINT    TS"{RVS)Q 
{0FF}UIT{2    DOWN} (BLK)" 
GET    A$:IF   AS=N9    THEK250 
A=0:FOR   1=1    TO   5: IF   AS= 
HID$( "EDLSQ", 1,1) THEN    A 
=1:1=5 

NEXT:ON  A  GOTO420,610,6 
90 , 700 , 280  SGOSUB1060 :G0 
TO250 

PRINT" {RVS}  QUIT  ":INPU 
T"{D0WN}i4aARE   YOU    SORE 

CY/Ni";A$:IF    LEFT? (A?, 
1)<>"Y"THEN2  20 
POKE    SD+24,0sEND 
IN$=N$ :AD=0  tINPUTIN?  tIF 
LEN  ( IN?  )  04THENRETURN 
B$=IN?:GOSUB320tAD=A:B5 
=MID? ( IN? , 3 ) :GOSUB320  sA 
D=AD* 25 6+A ! RETURN 
A=0iFOR  J=l    TO    2:AS=MID 
S ( B? , J , 1 ) J  B=ASC (A? ) -C4+ 
C A5> " @ " ) *C7 ! A=A*C6+B 
IF   B<0    OR    B>15    THEN   AD= 
0:A=-1:J=2 
NEXT  s  RETURN 

B=INT{A/C6) SPRINT  MID5( 
H?,B+1, 1) ,- sB=A-B*C6  :PRI 
NT  MID?(H5,B+1,1),- IRETU 
RN 

A=INT (AD/Z6 ) IGOSUB350 lA 
=AD-A*Z6sGOSOB3  50:PRINT 
":  "■ 

CK=IKT(AD/Z6) iCK=AD-Z4* 
CK+Z5*(CK>Z7) :GOTO390 
CK=CK*Z2+Z5*(CK>Z7)+A 
CK=CK+Z5* (CK>Z5 ) s RETURN 
PRINT "[DOWN] START ING    AT 
643"; :GOSUB300sIF    IN?<> 
S?    THEN   GOSUB1030J1F    F 
{SPACE JTHEN400 
RETURN 

PRINT "{RVS)    ENTER   DATA 
{ SPACE) ":GOSUB400!lF    IN 
^~N$    THEN220 
OPEN3,3iPRIST 
POKE198,0sGOSUB360:IF   F 
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MonFri  9ani-9pni  CST 
Satllam-Som 


ontput(ftbLLLty, 


^%JifLaLL^rnULLL  tU  Uon  Fn  9am  9pm  CST 

atnam-som  ^  \0  ^^  Sat11am-5pm 

THE  HOME  COMPUTER  STORE  THAT'S  AS  CLOSE  AS  YOUR  TELEPHONE 


■w>«r»«i«» 


NX-1000  PRINTER 

■  144  CPS-Draft  -aoCPS-NLQ 

■NLQinlO&IZPilch 

•S  Built-in  Fonts 


ONLY 


$165 


wmmmm 


.IL 


NX-1000  RAINBOW 

NEW  LOW  COST 
COLOR  PRINTER 


ONLY 


$239 


^/^/?/^/W/m///m^/^///W^/^/A 


Panasonic. 

10911 -II  PRINTER 

Now  at  192  CPS 


0NLY$189B0NLY$169 


'0!issix^jmmyA^///AyA^j9X0mk 


Panasoni 


PC  COMPATIBLE 


VENDEX  PC 

12K,eMHZ,2DD,  7Slet 
SetiaJ,  Parallel,  Mouse  & 

Game  Ports 

S1000  of  Software  incl. 

MS  DOS  «  BASIC 

Mono  CALL 

Color  CALL 


Packard  Beil  PC  XT 

eMHZ,  640K,  HERC/CGA. 

Ser/Per,  Clock/Celendar, 

360K  DD,  AT  Keyboard 

Dos  X2  &  GW  BasicSmsll 

Foot  Print 

with  Color  $879 

with  Mono  $698 


We  Carry  the  Complete  BLUE  CHIP  PC  LINE 
CALL  for  your  Configuration 


OvfjrffMffffffffffnrfffffff^r-r^.fMVffyyM>. 


1080i  -  II  PRINTER 

Now  at  144  CPS 


AATARF 

520  ST  &  1040  ST 

SYSTEM  PACKAGSS    CAU.  FOfl  LATEST  PHCES 


<r!»»K«»:xo:fffl««««fi«««e«A«A«^ 


AMIGA' sm 

COMPUTER        SYSTEM 

CALL  FOR  CURRENT  PRICES  S  AVAILABILITY 


V*jMMr^r^^M^;r^fMr^;rM^^r^^:r^fr^r^r^M/:r'  '^^■,J-rMKrMrMMmrffffffemrfffJ'Jrff^rA9  'WMJ'M/'AM'^M/'/'Mf/'^yM»'yn!fX^^ 


& 


commodore 


1  MIC  Disk  Dtivo      64CC«iip(jl«  IBOKUcfilw 

1671  Disk  D(we        C-128C«n(>uler  lOBJ  Morttx 

ISaiCDisls  Drive      C-i;SDCompul« 
CALL  FOR  INDIVIDUAL  &  SUPER  PACKAGE  PRICES 


1750RAME>p»id«r    Avalei  1200  HC  Modem     1351  Moose 
1764  RAM  Ejpander    Avalei  2400  HC  Motjan     ICONTrdief 


CALL  FOR  CURRENT  PRICE 


SEAGATE  HARD  DRIVES 

20,  30,  OR  40  MEG 
CALL  FOR  LATEST  PRICES 


.-..J*,BS 
....lifts 

AnDHm  An  Df  Wv  ;  Sfti  . 

.„.J7.M 

Amawn  All  bT  W*  „^_^ 

„_fiBS 

An  Gawv  1  ai  U 

. .IIM 

BBlBxaorpDiMr _. 

_— SIJS 

Bra  IM  . .    ... 

„„..MJ5 

^TtrtlZl^h.-      

..__M« 

BKhJKliAcatartiT 

....J«.is 

eCFmWni* 

1  us 

^rma\  .  _.   ...„^..„ 

,^^.ji« 

ausi  u  „  ...._      . 

..*.  1*Bii 

Buflinm  Cv«Utft*r  ,.„.,^„.3(.y} 

Caitim«  Omrma 2S.D» 

CnmpDntnp  OoH  .. — ....7&.Q!» 

CHampontf^ip  SmbMII IMi 

Omtirrmtmf  taac l\Vi 

OwM  Viagw  Mv  FS 7e.lS 

aip  Art CALL 

C*rwirt»  ... _....... ....IMS 

Dthi  CwM i«JS 

bilvicto  «l1ha  Cnnvrt 2^5 

ZG.B5 

BM . JBJS 

M&SHw  Eqk 2 1 J5 

Frion H.ti 

FH^  Sfmiaar Ul& 

Stnrr  Oitki 17.15 

OBA  Crwnp  QnMlbtf 7Si.B& 

OFL  f  eetial n.ti 

(kwm  Stom  aid|^ U.I5> 

OiUiiif  TTaFm ».■& 

(k^Mp 3aa& 

hwdbtf  „ ^?4.B5 

Hti:n^Mfi  audi ia.BS 

tMa  Shat„. . ,..B7.BS 

imtForPlvdOcUtNr ..33.B5 

■•aQor  Spars ...^ 19.B& 

Jtl  .,....„.„,„_.,^ S4BS 

KJrv'»Qi«l  1,7  V  3  _......- 30  J» 

Lwj  oPLtginilv >7.t& 

L««9«r  Qodikik  , 2S.t6 

L*«krt5k^lLvf|r  „_<.,...^34t5 
WW  G«eM .. ,,,-,  If  *5 

UHfl  te, ..,.„.,, 3a*a 

UfnpQliP .^ — ..!"5 

**t'eyry  «-., — IttS 

UcnLnrvv USi 

I  US 
MIS 

fcln  Pyn^..,....,_ J*,»S 

NBA  BmWH)..,^..^..,......  flBS 

NmrfHW .,»...  M.I4 

Hnrtrgom ,-- >-...^^.37>S 

tfLCMMfig* .„U.I5 

Piwn  _., MJIS 

PhKTjM  I 2MS 

PlntoiVirnrd SIJiS 

Ptraai . __..*5,BS 

PlarwHJlun SB.ti 

PDkca  Ojotil 3T.IS 

Pmt  WEitar  PhJi UftS 

PfHi  Snop 34,M 

Rirg*  ofZlflo 15.64 

RouWvKXX) 7&ftS 

Romimtc  Emowikri ...  UK 

sm JS.B5 


aMm  S«rMi(_. 3I.H 

ScKa  Quatt  1  v  3 3I.SS 

SorFlMll 3?» 

Sw  FtMCa .. 34.ftS 

Swtlght 33.K 

Swgi(S» a.K 

anal  SporhfiBvrtiBl t6.K 

awn  Spgrk«lcU«txl  ._^_.,  KK 

Tlr****-  _...„_..  . _„ .  1 1 .» 

a-D  Ktiincflp»fS*MKaf  ,..„..  3M« 
ThiAMr CnaHMf  .._.^,.<^.  tt.H 

Tn^^  Tutw  IV  _„ ...30.85 

IMtmu  „. .CALL 

Uriv.  tJk\KMy  Smuaur ^ »  BS 

Up  Pwiicopa  ... . .—..„.  19.U 

USA  EVTTwi  Sa'fiBgi} 39.BS 

WorU  CwTTwi  SaiOa^a KM 

WofO  Claii  Lndv  Bd I&H 

WarBTouf  GoB  P  95 

OQamMI.  H__„....„..  388.86 

DAC  E»r*=T2Ci^„.„^_.„...5BB4 

DAC  Bopu  P«  B.a. ...  IDA  8S 

DAC  Enr  U»  ..^..u .„^.  M-K 

Dtfivi  I  Sn4  3.D ,^^  iO'LBd 

Rln  I  ., .> -. „ 3a.BS 

FwiB««^w.-.v— ..- — ™...1D!.BS 

Fern  T»<  -..^. .-.^^^  S*.B 

OlM«Ac  Own  3J !-*  » 

Ora-^T^UU  i. „  *9.K 

Oclw a.B 

J,K,  Lmwi  Tm  .-.,.,-..—..  M.K 
Mwvfllflg  Ucntr'J  .^^.^  1H.BS 
-     „.,„.....  Si.B 

utoDMn  PC  wwi ...  ii9-» 

MrrwS .»,» 

Mlrt«nm  ..™.„,, ............. «8» 

IWDn  UUi1«  A*  -^^ ^„.„7B.85 

PCTfloti  Mitfe ..«,K 

PsacMnM  Corrpi^'m  I  ......_.  1U.B5 

PFS  lilCnnloi  2.0 n.K 

PFS  Prckuiorwl  W1M 1 14.85 

PuMmn MIS 

0 1  A  ..._.„ 184,85 

QuKn . —  II4.8S 

Awttxi  47  „._.„ 44.BS 

Tn  JhMVtt^p  07 44.8S 

Tirto  G._... W^B$ 

VftnaPwba«.S „_!i*.M 

XT-^P-Q ..._,______,_■  Hjjij_ 

ll:l.'l.'HJ^f.Vj:-iTR^ 

MOL.H  Srito^i  PC 109  09 

MACH  3 .-, »» 

UcTOKl  SvVI  HauH 108.00 

ItMX  F3  TBw T0O.0O 

RriH  Pr«in  I  Jarn 78.00 

CM  FligW  S!tt ™ Si  00 

Kra.1  Uo-o  MouM 68.DD 

0«nkjiH«jM  7S.D0 

IJJ:I.W!l.lJ;I.7?nTga 

Mo^o^^pnd  w'pp  ..^...-._..a9.M 

ATT  V)P „„.H...-.-.-  WS-DO 

CiVs'gtl^Kl  Hf'fO  ■—-■""►■"■  "^'^ 

ATIWp^W  ,.-..... 188  00 

eOCAEC^Auc... 138.00 

Er^  EGA  Ki^iv laSJiO 

Owst'C"  ^.....^ .. 35-00 

P«WH  fOA  Agu  4ap  ^„.-„  1£8J10 

O^  EGA*  ....„_,.^.-. 17SJ!0 

C*T)tC*0  IfT 17.00 


tidP^m 

Femmuw  iW 

OMim... „„ 

t^oC«<17B... 

Ctoo  On  1!B 

CtaaFH12a..^..._ 
CteoV*iB  ^M 


-  JSM 

„*<B 
..44.95 
-44.95 
_  44.45 
_  44.45 


A^rwt  „ ,„.™_..^_ 

™H.» 

Ann»» ,™„  ,„.,.,-_ 

._44,» 

AmWM ™,^ ,- 

_S1.» 

BWlTrt^..,,.,... 

...».BS 

QwdilMII. -       .. 

_3?.B5 

Bktp-N  Wr»s« 

—  1B.BS 

CartJknUMar „. 

.-2S.B 

C*F«lakMaharLbll 

-..22.B5 

OtpM\ir3.-.     .-.    

.._  H.« 

-._7iM 

OtITOl*  .. >.„ . 

,--H.B5 

f -15  Sr*tH  £■#•  „_  ....... 

,..n» 

Fgnih*gm..„.„....,-^--.- 

.-31.B5 

OiKPCI  L»  1  Jofl  „,.,„ 

...11B5 

...Sl.Bi 

lAAnv      .„. 

^11-85 

J7.8S 

.„  37.85 

1*1*" 

..79  95 

PnarnHMUvS . 

...»» 

Pn« »«.«,»    ^,4,..*., 

31.85 

9H^Sw«  ,.,_.....,„.- 

...33.85 

SW^KW .^,^.,— 

._».95 

3»flSfHftiBH«M.. 

...a95 

SwHSpo^  nwfcnatf  ^- 

--K85 

Ttg  T«im  Wm I'rig  _,.„„, 

...aas 

Wt»m  \n  rta  U.a.A.  Ii 

Wh*J«inn  Wondli 

C«n*nB«!l»flo  „,...», 

™.»95 

AiA  DuiT .. .._._^...-»  BS 

Baam  at  Pmmr SM 

B»a^  TM X3JH 

CrwumvwHBa  .-^ 33.85 

DKEurJhXDunljng2.0 B4AS 

Itan  CBta_^ .^ KM 

aav^nngwST 4&.9S 

Dabndir  7l  B*  C«art  „...._.  33.95 
D*«H  Bit  .,„...^...-...-U« 

hrtClfl.... -, -„,73« 

Eht  Oiw  -. -— .-  4ft» 

KTr^ti ^...„-.. ,.»jH 

F-IS  Smiia  E««i  .............  I7jt9 

FHH1  ^ . ...H'Ji 

FlflRtStns^^iir.. .....5a» 

Gvurat ,_...-. . 32.B5 

GFABWc . .....4fl.K 

GFACanplw 48.B5 

GFACon^furtofi 3?  BS 

GFADniH B*JS 

OFA^tacki' 3t,K 

OaU  fKrwm i*K 

Hiilt^i  ... *._I7.B 

KtatM  HMft«W  _. . „,24.K 

ManiVWUni l!4-B 

P«p«f  flojf  ,,„_....., ........  32.85 

P.t  &»  .,„„. ^^^.„,...«  85 

Pftsm  Mrvo ^,r-B5 

PrmmrPi^ ^HSi 

Prtni&iop .. 3tJS 

PuUlihr^  P*TW (4.8S 

Sttnx  S^n^n  „.^,^.,„-.^^^-H.8a 
Sw^fmr  .,.......™^-.....,.^?t-BS 

Sunbg  _. . .-,..— -W-84 

S#««eST . „...-..  *a,84 

ImniOOtttim  ....„.,.,._  141.8S 

T«  DrM „„..„.,.^-  14.8S 

Tnpwii  „.„-.„^..-. 34.85 

Trwkv  ^™...^.-,...^H-.,...-?«.B5 
Tim*  Bwn  ...„.^...,-.„-..,.  34S3 
Wflrfl  PirtiCI .,»(..  ..rH^.B-tw.-i..  251-93 


3J.IS 

fti*irw)CMIlMr.. 

38  J5 

..     ?8J5 

»<■'; 

O^hndworraCTrm- 

32  J  5 

OtbKUjK^D 

„__I*J5 

™       ,B4J5 

0«lw<Piwt? 

,yMi 

OiiJM  Pttwwrtora  .„ 

__..  124  JS 

OaUMMdHl.;..—. 

94  J  5 

Dtbii  ■•*«■  ..,-.^.— 

aJ5 

DynartcCAO  ....._.„ 

258  J  5 

E«t  M«Mr  BBHtiai  „ 

..    _.a2J5 

..    ...31.85 

F*srtafTi.l»bFl 

31.85 

GrkJlTun..     

.      44.95 

IndaofSponi 

Sii 

lFaa1VFigr4 

»JS 

Inn  n4  EagM^  Kart  ^.„ 

-. 34JB5 

M-ma  KB  !...„.,.„_ 

..    .-.34J5 

KkngiOjanUorJ  — 

......  33  J5 

L«ft>«&LnLw*y_^ 

3355 

7aA% 

MiTABacviTning  _ 

»55 

MwflU-..^^..^-. 

...  77J5 

PW9I  9nw ..... . 

„.„„  OB  B5 

P'viiUmwtPSM  .. 

_,„,.3IB5 

PuHarar ,. 

II8J5 

FtaaMvEifopa 

I5J5 

31J5 

ai«rt  SarviCB  — . 

.....     2S.BS 

„. B8B5 

T«l  Ornn  ..„.,,^..„„ 

„    .....27,B5 

Ta^ffPwti 

.„     24 BS 

B8B5 

>^   SINCE1982  ^m  a        m 

ZMniputc/iiiUittf, 

P.0 .  BOX  17882,  MILWAUKEE.  W!  53217 

ORDER  LINES  OPEN 

Mon-Fri  9am-9pm  CST  Sat  1 1  am-5pm 

To  Order  Call  Toll  Free 

800-558-0003 

For  Technical  info.  Order  Inquiries,  or  for  Wise.  Orders 

414-357-8181      __ 


iflilA  siaifiibKcuM'&Hl 


J  (ANS£RaACK=COMPUT  MILW  UQ) 

No  surchage  for  Mastercard  or  Visa 


A«a  aVttmf.  ... .._ m85 

Anauma  Rmpv . .  2Z.BS 

Alan  Fliai 20-95 

A/mrrmM  f^mn/ 20.85 

Aivntf  on  Saoan £0.95 

AfWid  I^B 1195 

Anrfol  1  or  I it9S 

Art  aaa7  \  it  1 _..  iLtS 

A«/^«a<  ..*— ™~, — -.  31.95 

BMSW«Br«r>w  ^^■.,  ^  .„— ItK 

BlUf*  Tita ._ . ...  »BS 

BacCemfiil*  .....„„™...H.-.?iBi 

DVH  Utt/PagMa 11.B5 

Bimack  ._..._. . Il.B* 

&m0ijmat /ks^mti KlBS 

Bcv  tr  Wiaite  ... ....  18.B5 

Qunrau  Fonn  Snap 25. B5 

&«rpw  Sdcta  M«ar 31.B5 

CaifornlBCMrnn  .„.„.. ,.„2<K 

Ctrvu^  S«4«QQ ^...^iJ.K 

Chvfiai liK 

C^aiaflHWlDOO _-...»» 

Ca3  PH  _. ....^,„„»,»B5 

CspKlIM  „.......^^.„.„^„.*7,BS 

Dvn  C«tB . ..21.85 

DauMavgw  y 15.85 

Dato'^arpliraCrdan 22.85 

Damofi  Smmrv  «^ — -^ 30.85 

Dut-tvPuEIW  „.  ..,.., 3B-95 

OvSe^lV  ^„„.„^..^^  1185 

EOS  .„.._.. 20-95 

Ecraun 3t85 

EW ^.-^ —  33.95 

Est*  Dtfsm  .-...,+1,-., — —  35.95 

Faiy  TM  fur*  ^.-.... 33.95 

Funtwo ..-.-.-.— 34.tS 

Fl  39inn  Ei^ 23.95 

final  CaVUpi  3 4t.tS 

FUffiTSfeTiLuns'l . 3^95 

Fitapcwar ItfS 

FHil  0>m-,~.^ CAU. 

Fuinimpnw  2  -_ 30.95 

IllS 

3*.t5 

Oiom  ..,..„.— — S.B5 

O40  Pn^grvmriMr... ..._„4ft.B5 

OMfLlWlM  *4.iS 

Oaci  l^alda  ft  Ou , K.H 

Oia  InpwPiN,..— . ».Bi 

OlM  _„ .,.^^„......  37.95 

0-«tHa  .„.„,,„H . 18.95 

0«*vimii . ^^ .„ —  32.95 

{bcoa  Cwnmamr 70.95 

□Ltd  ot  TT«aHi ...... 75.95 

Q.r«^p  -.—- , 27.B 

Has  dI  UaTWBjma  .„„_„- 7G.B6 

HaT«r  ComtL  amiiitor 1B.95 

rk^b/nKJOrDBai 7S.95 

kn^opr  Spora  1  ar  7 18.95 

InptnlMuac  -.„.„,..„...^ 74.85 

knv  ra  Eb{»«'i  Hnt 18.B5 

JM  ,.....„.....—..... . 77.B5 

Kq  MkU  ., -._-..„ 18.85 

Lmi  d'  laganda  ........ 32.B5 

Lu^IVr^a . 27.BS 

LBimif  OaftMnu ........  77.95 

NBA fc.t5 

Nmiroom > .  SO.tS 

il>Kr>  VCan ™— .„ —  Ji.Bi 

Maia:MnlBn Tt.ii 

Dm  Malnni 70.K 

af  HnBA n.K 

t  B*t»n  IvfKng ^^^  H.BS 

,.,.,  JiBS 


Ughit  l  Umoft HtS 

Mnl  PuE .. 1*84 

UJ.SJ.  OKxtf &.H 

UhoIui  ,.,..-,.^ — ,.-..  »•* 
Uv4pgnr  *-" .^ ~  ** 

O?^  .„.,,. ^,,. — 25 

OungoAJi  PigBi  ___^„  3145 

Pwom  Bof -.....—» —  72.45 

fmmr  0.p  m  _„...... SJ44 

Papw  Op  PuBiia''w 33.B 

PagHa ,711* 

Porfcl »I4 

P.a.C(mpw4#i tl.ti 

Phvtlua  IJ1.n  IB ii.K 

PiPiW  .„..„, .„...,.^...^.!i03 
pimflwiiffl  ,.,,..„„.....„... 44.Bi 

Prtil  Svv ., ..  38.86 

PrtiniMai- . ..21.85 

P%rm  Stxi  bBlwdMI ..  H.85 

Puv  Sixi  FoBtai 7&» 

Pk/1'^bt  Bsalirt  ■■»■•.*■•■■.->  nBa 

nmta  VI  Radin  „-.^ H.H 

flirtmaiQa'b«« »H»9 

Hod  Stom  FBa^ ^  29.H 

fBrg«6far(ni . »ti 

14« 

..„21.« 
....2&«S 
.„2I.*S 

awd  Dl  Spiiiig H.t9 

S*ri  SaVcB .- _. a*5 

&*»  •■  0- „..^^.  »i.ia 

3iTte*2 .^..H...31.»5 

3t.  9p«r«  Dn— nw  ». H.tS 

SL  Spva  &44tial  ....«,-.—  74.85 

&*qKMf  ...... „.-_,7iB» 

Sip  Rn  Fhifjngl  18.85 

Spm  Ra«  ,...H„^ .„.._.  21.85 

SJooga  Sm=t  UtMlan .....  UBS 
St^tV  G  Cfienp/V  „m..^..»38,K 

&^«*H  U »...»»«  " 

5up«4>Bi^  I -„H 

a^MrPMCll  . ,^.,.H^.„..3i 

SuimBj  Soocar _.._.„.... 77.H 

Saibi-H ......37.14 

Smi»aK»dnmrt 14.H 

S)t^i  Ptrm Tin 

TarrM  DlDoom 72.tS 

TMtiy-t*  ., . .^^  laB* 

Tn*  [X/*9aan.,.._„^_..„ItB5 

TTw  GviMI  — .-..^ 22.85 

Th(  Php<i  ^^^..^.........25.85 

Trvfl<W  CnwPV  -. — .-,....  58.85 

Ta*V«%R»«**m _»»$ 

Top  Ftal  EIWWM)'  . — ....  18.85 

TfVUtormn  ..^ ^,.....  1(LB4 

TtfW  _-„»,„..,.......„„  1I.B4 

UpP*f.taf» ..., „..„  f8.l$ 

uriraii „..™»Hi» 

UriptuS ^.„^„h5I,» 

Ufim*4  .. . . 3184 

UtlniiS  frlwcfTl 3a»5 

X9^14  . . — .. 18.15 

WpcgBna  CnniiFucloi 20.95 

Vfiisny  .._..„.............2S.84 

Who  Cl»i  laaJw^  Brd 25.85 

Wohd  Tpi*  Oof  - 71» 

WorehrUa-  3 . Til* 

WVtT  Wmling ia.8S 

V«»(j«*fS 74  B 

7M -77  B 


OflJJEfiHG  INFORMATION.  (•*■»•  •p»ftlyt^t*«-fw!»«ii»l wry  J«r«'CBa**«r*t'!aeiiO'ntBn»)f9WB^  Pmrtcra!.  ani  ^ifffiaff/ e 

rt^f»fl.if*tJmuw  HSJIO.AII  dtObt  i^icp»J*j9_.  . 

haj«1k»-r"W'w-TT  DtaTOOW  tmp^oHiaiBmft-e'V'a  Ai  wibcr« '■i-'^ -tj»!  Hb^  ■"•i^SyWrttionRjniMr,  Pimm  tii  (Ai*fM7*i«T  W  9«a*i  a'RA*  wjwji 


rjCjtXD.  cnufliM  h«  >1.H.  k\  Coirtnet^USA  kcMa  }3JM3  Br  HlBim  Vtwi  SiU  iftppng  I 


l0««cw™a«i«c«u*  .jri>-«10ftdl»lW»flfipa«  W«iawrtJf*B*i*w«yO»rt  WWlfc 

am  T^  C««-«-:si  USA  M  ^'coal  Ml  OWP  .'WM  OS  ™i.  r  bPWffi  (ftWFg  crw^M  «cwa  »  rninrwr  arioirt,  TOO  Wl  la  itfwgta  M 


irl  roT  Em  *rf*Liiw!  P-^ai  wv  w 


3  O^VQB  irrxtjl  noMt. 


THEN    PRINT    1N?:PRINT" 

(SPACE) FILE     ":OP=0 

RX    1010    AH=INT(A/256) sAL=A-(AH 

[UPJ15    RIGHT}"? 

EOC    710    IN5=N5:  INPUT"  (DOWN  }FILE 

*256) sPOKE193,AL!POKEl 

GC    450 

FOR    1=0    TO    24    STEP    3:BS 

NAMEg43";IN$iIP    IiI?=K5 

94,  AH 

=S5:FOR  J=l    TO    2!lF    F   T 

( SPACE )THEN2 20 

FF    1020    AH=INTCB/256)!AL=B-(AH 

HEN    B$=MID$(IN5,I+J,I) 

PR    720    F=0 : PRINT "(DOWN  3 (BLK) 

*256) :P0KE174,AL!P0KE1 

HA    460 

PRINT "(RVS}"B5L?;: IF    I< 

( RVS )T[ OFF  JAPE    OR    { RVS } 

75, AH I  return 

24THEN    PRINT "(OFF]"; 

DjOFPjISKs     g43"j 

FX    1030    IF   AD<SA   OR  AO>EA   THEN 

HD    470 

GET    A$!lF   A?=N5    THEN470 

FP    730    GET    A$:IF    A$="T"THEN   PR 

1050 

FK    480 

IF(A5> "/"ANDA?<" I "  )OR(A 

INT  "T  { DOWN  )  ■■  t  GOTO880 

HA   1040    IF(AD>511   AND   AD<40960 

$>""@"ANDA$<"G")THEN540 

HQ    740    IF    A?<>"D"THEN730 

)OR(AD>49151    AND  AD<53 

GS    485 

A=.-(A$  =  "M")-2*(A5  =  ",")- 

HH    750    PRINT"D{DOWN3"!OPEN15,8 

2 48) THEN   GOSUB1080:F=0 

3*(A$=".")-4*(A5="/")-5 

,15, "10: ":B=EA-SA:IN$=" 

: RETURN 

*(A?="J")-6*(A$="K") 

0:"+INStIF   OP    THENB10 

.^C    1050    GOSUB1060iPRINT"CrVS) 

FX    486 

A=A-7* (AS="L " )-a* (A$=" t 

SQ    760    OPEN    l,8,8,IN$+",P,W"tG 

{SPACE}  INVALID   ADDRESS 

")-9*(A?-="U")-10*(A$  =  "I 

OSUB860!lF    A   THEN220 

{ DOWN) { BLK) " s  F=l s  RETU 

■')-ll*(A?="0")-12*(A?  =  " 

FJ    770    AH=INT{SA/256):AL=SA-(A 

RN 

p..  J 

H*256)!pRISlT#l,CHR$(AL> 

AR   1060    POKE    SD+5,31:POKE    SD+6 

CM   487 

A=A-13*(A?=S5i sIF   A  THE 

;CHR$(AH) ; 

,208:POKE   SD,240:POKE 

B   A?=MID${"ABCD123E456F 

PE    730    FOR    1=0    TO   BjPRINT#l,CH 

(SPACE }SD+1, 4  SPOKE    SD+ 

0",A,l)iGOTO    540 

R$(PEEK(BS+I));:IF    ST    T 

4,33 

HP    490 

IF    A$=R$    AND( Cl=0)AND(J 

HEN800 

DX    1070    FOR   S=l    TO    100sNEXTiGO 

=  1)0R   F)THEN    PRINT    BS  ,•  i 

FC    790    NEXT!CL0SEl:CL0SE15sG0T 

TO1090 

J=2:NEXT:I=24:GOTO550 

0940 

PF    1080    POKE   SD+5,8:POKE    SD+6, 

KC    500 

IF   A5="{H0ME)"    THEM    PRI 

GS    800    GOSUB1060:PRINT"{DOWN} 

240:POKE    SD,0 SPOKE    SD+ 

NT    B5:J=2:HEXT:I=24:NEX 

(BLK) ERROR    DURING    SAVE: 

1,90:POKE   SD+4,17 

T!F=0:GOTO440 

E4§ " !GOSUB860 !GOTO220 

AC    1090    FOR   S=l    TO    100:NEXT:PO 

MX    510 

IF (A$=" (RIGHT) ")ANDF  TH 

MA    810    OPEN    1,8,8,IN?+",P,R":G 

KE    SD+4,0sPOKE   SD,0:PO 

ENPRINT    B$L9;«GOTO540 

OSU8a60:IF  A  THEN220 

KE  SD+1, 01 RETURN 

QK    520 

IF    A$<>L?    AND   A$<>D9    OR 

GE    820    GET#1,A$,B5  5AD=ASC(A?+Z 

Q 

(( 1=0 )AN0(J=1)) THEN    GOS 
UB.1060:GOTO470 

$)+256*ASC(B5+ZS):IF   AD 
OSA   THEN   F=1:GOTO850 

HG    530 

A?=L5+S5i-L$:PRINT    B5L?  ; 

RX    830    FOR    1=0    TO   B:GETtl,A?!P 

!J=2-J!IF   J    THEN    PRINT 
{SPACE}L5;sI=I-3 

OKE    BS+I,ASC(A$+ZS) :IF( 
I<>B)AND    ST    THEN   F=2jAD 

QS    540 

PRINT    A$;iNEXT   J: PRINT 

=1:I=B 

PH   550 

( SPACE }S5; 

NEXT    I:PRINTiPRINT"{UP} 

FA  840    NEXT: IF   ST<>64    THEN    F=3 
FQ    850    CLOSEltCLOSE15jON   ABS{F 

COMPUTE! 

(5    RIGHT  J " ; : INPUT*  3 , IN? 
:1P    IN?=N$    THEN    CL0SE3 : 

>0)+l   GOTO960,970 
SA   860    INPUT#15,A,A5:IF  A  THEN 

TOLL  FREE 

QC    560 

GOTO220 

FOR    1=1    TO   25    STEP3!B$= 

MID$(IN$,I) :GOSUB320:IF 

CLOSEl :CLOSE15:GOSUB10 
60  SPRINT" (RVS }ERROR:     "A 

Subscription 
Order  Line 

X<25    THEN   GOSUB380!A(1 
/3)=A 

GQ    870    RETURN 

EJ    880    P0KE18 3, PEEK (PA+2) SPOKE 

1-800-727-6937 

PK    570 

NEXT:  IF   AOCK    THEN    GOSU 

187,PEEK(FA+3)tPOKE188, 

B1060  :PRISIT"  (BLK }  (RVS } 
(SPACE) ERROR!    REENTER   L 

PEEK(FA+4) :IFOP=0THEN92 
0 

INE    g43"!F=l!GOTO440 

HJ    890    SYS    63466:IF(PEEK{783)A 

HJ    530 

GOSUB1080:B=BS+AD-SA!FO 

NDDTHEN  GOSUB1060:PR1N 

R    1=0    TO    7:P0KE   B+I,ACI 
) I NEXT 

T" (down) [RVS}    PILE    NOT 

{ SPACE )FOUHD    " :GOTO690 

QQ    590 

AD=AI>l-8tIF   AD>EA   THEN    C 

CS    900   AD=PEEK(829)+2  56*PEEK(8 

L0SE3  tPRINT" (DOWN) (BLU) 

30)slF   ADOSA   THEN    F=l  i 

**    END    OF    ENTRY    **(BLK) 
(2    DOWHj ":GOTO700 

GOTO970 
SC    910    A=PEEK{831)+256*PEEK(83 

Use  the  handy 

GQ    600 

F=0:GOTO440 

2)-liF=P-2*(A<EA)-3*(A> 

QA    6.10 

PRINT"  (CLRl  {DOWN}  (RVSj 

EA) sAD=A-AD:GOTO930 

Reader  Service 

(SPACE) DISPLAY    DATA    "jG 

KH   920  A=SA:B=EA+l:GOSUB1010sP 

OSUB400!lF    IN?=N5    THEN2 

OKE780,3:SYS    63338 

20 

JF   930  A='BSsB=BS+(EA-SA)+l!GOS 

Card  in  the  back 

RJ    620 

PRINT  "  (DOWN}  (BLU)  PRESS: 

UB1010:OS    OP    GOTO950:SY 

(RVS) SPACE (OFF}    TO   PAU 

S    63  591 

of  the  magazine 

SE,     (RVS) RETURN (OFF)    TO 
BREAKNi{DOWN}" 

AE    940    GOSUB1080jPRIKT"{BLUj** 
SAVE    COMPLETED    **">GOT 

KS    630 

GOSUB360 :B=BS+AD-SAiFOR 

0220 

to  receive 

IsBTO    B+7!A=PEEK(I) SGOS 

XP    950    POKE147,0:SYS    63562:IF 

UB3  50:GOSUB380:PRINT    S$ 

(SPACE )ST>0    THEN970 

CC    640 

NEXT: PRINT "(RVS)"; :A=CK 

FR    360    GOSUB1030 SPRINT "{ALU}** 
LOAD    COMPLETED    **"iGOT 

additiona 

:G0SUB3 50: PRINT 

0220 

KH    650 

F=liAD=AD+8:IF    AD>EA   TH 

DP    970    GOSUB1060 SPRINT "[BLK} 

information 

ENPRINT  "(D0WKI){BLU}*»    E 

{RVS}ERR0R    DURING    LOAD: 

SD    OF    DATA    ** " :GOTO220 

[DOWNjg4j"iON    F    GOSUB98 

KC   660 

GET    A5:IF   A$=R?    THEN   GO 

0,990, X000:GOTO220 

on  our 

SUB1080:GOTO220 

PP    980    PRINT "INCORRECT    STARTIN 

EQ    670 

IF    A$=S9    THEN    F=F+liGOS 

G    ADDRESS    ( " ; :GOSUB360 s 

UB1080 

PRINT")": RETURN 

advertisers. 

AD    680 

ONFGOTO630,660,630 

GR   990    PRIKT"LOAD    ENDED    AT    ";i 

CM   690 

PRI  NT  "[DOWN)  {RVS}    LOAD 

AD=SA+ADjGOSUB360 :PRINT 

(SPACE} DATA    " :OP=l sGOTO 

D$  s  RETURN 

PC    700 

710 

PRINT "(DOWN) {RVS}    SAVE 

FD    1000    PRINT "TRUNCATED    AT    END 
ING    ADDRESS": return 
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COMPUTE  4/as 


115  Nassau  St.  NY.,  NY.  10038 


Penn.  Station,  Amtrack  Level  Beneath 


Bet.  Beekman  L  Ann  Sts.(212)732-4500  Madison  Sq.  Garden,NY.,NY.  10001 
Open  Mon-Fri,  8: 30 -6: 30 /Sat,  CLOSED        212)594-7140  Open  Mon-Wed,  8:30-8/Th 

Sun,  9:30-5:30                             *       '  &  Fri,8:3Cr-9/Sat  &  Sun,  10-7   ' 

r..?c'^^.5?IR?..'^J^D       1  f  800)  3A5— 7058  '«  new  ^o«k  state  cau 

INFORMAT  ON   CALL        J.\OUVff»J*fJ        I  \JJU  i-jt'>\KOA     7iAn 

TOLL  FREE              i/Rnn^7/ii;    7ni;n  (212)594-7140 

OPEN   7   DAYS   A  WEEK                          J.  \  OUU  /  •JHD f   II3U  f^OP   CUSTOMER   SERVICE   CAU   MOM-FRI   ! 


FOR  ORDERS  AND 
INFORMATION   CALL 
TOLL  FREE 

OPEN  7  DAYS  A  WEEK 
FOR  ORDERS:  MON- 
FRI:9AM-7PM    /    SAT    t  c, 

SUNi9:30AM-«l»H    E.ST.  ^J 


L     1  \  tf  UU  \  J4!l  -  /  UDO  "{m)594-n4o" 

1  (800)345 7059  ^C^   customer   service   CAU   MOM-FRI   9AM-4PM 

FAX  NO.  212-564-1497  telex  422-1 32  HMOLLER      (718)965-8686 


EPSON 


EQUITY  1  + 

IBM  PC/XT 

COMPATIBLE 

PACKAGS 


•  6dbK  RA^A  w/ Clock  Calendar  ■  2 
360K  Drives  ■  Keyboard  •  S«rial/  Paral- 
lel Porls  ■  1 2' riigh  Resrjiulion  Wonilnr 

-  Box  of  10  Dish6tle& 


'849 


Samfl  PacXage  with 

1  Floppy  &  20MB 

Hard  Drive 


»1049 


•  IBM  XT  Compuler  .  IBM  Keyboard  256K 
RAM  Expandable  to  840K  ■  360K  Disk  Drive  ! 
-  20M9  Hard  Drive  •  Package  ol  1 0  DisKetles 
(Moniiar  OpIionEU) 


«1499 


IBM  XT  Package  with   tj  a^q 
2  360K  Flopp/  Drives       I  ^  /  SJ 


SEC 

POWERMATE  I 


IBM  PC/XT 

COMPATIBLS 

PACKAGE 


•  800286  SMHiProcMsot  ■  e40K  RAM 

•  i.aMB  Floppy  ■  12"  Monliof 


'1349 


Same  Pkg.  with      t  1  C7Q 

»Ma  Harcl  Drive      *    1  O  f  5J 


POWERMATE  II 

w/hAonrlor 


LEADING 
EDGE 

MODEL  D 
PACKAGE 


•S12KRAM 
I  Corripuler 
■  Keyboard 

•  360K    Floppy  Drive 

•  4.7-7.16  MHl   '12-Hi9H    Ftesolution 
Mono  Monitor 


*799 


Sarne  Package  v^lh  j  ^  /\^Q 
20MB  Hard  DrHie  '  W**?? 


LEADING  EDGE  f^^nn 
MODELD2W/12-  *|239 
Mq-"-- 


PERSONAL 
SYSTEM  2 

MODEL  so 


lv./7aOK    Floppv 

lDriv«    &    SOMB    .A__n 

I  IBM  Hard  Drive       *2  599 

Persona;  System  I!  Model  25 E  5  049 

PS  !l  Mooei  22  W/CDlor  Monilor 511299 

PERSONU.  SYSTEM  II  MODEL  It tlm 

PS  II  Model  BO  W/44MB  Hard  Drive  a 

1  720kFlQpov  Drive S3689 

IBM  Personal  System  tl  Mortllort 

6503  Mono 5249 

8512  Color S479 

85l3Cotor £529 


PS,r2  Model  30  w/720 
F  «(>py  [^'ue  &  ZOM  Q I BM 
Maid  0mm 


'1599 


IBM  PC  PACKAGE 

IBM  PC  Compiitar  '  IBM  I 
Keyboard    ■  25fiK  RAM 
E>pandablelo640K'One 
Floppy  360K  Drive  •  12' 
Monitor  '  SeriaJ/Parallel  j 
I  Ports 

«999 


iBUJE  CHIP  IBM  PC  AT 
COMPATIBLE  PKG. 

512KPAMEKpan(laWeto  i 
640K-  360K  Floppy  Disit  | 
Drive  ■  12"  Monitor 


*499 


SAME  PKG.  W/20  if  ant 
MBHARDDRtJE       I  O^l 


PRINTERS  -  MONITORS 


I  OtO-l  20 S1 B9 

I  OWMATE-EO tl38 

I  OKlDATA-180 $2ig 

EPSON        ,,„ 

JfX-a6E $309 

IFX-2B6E t449 

IlQ-800 $399 

(.Q-aSO S499 

X-800 $165 


STAR 

NX-1000 S169 

NX-15 $279 

NB-24tO $399 

PANASONIC 

1080i-li $1M 

1091III    . $199 

10S2. $279 

SEFHES  II  *1  649 


,^    ^,      TOSHIBA 

32V-SL S479 

MONITORS 

THOMPSON        Utlra-Scanl 

Monitor $469  \ 

MAQNAVOX     EGA      Monl-I 

tor. $3391 

MAQNAVOX  EGA  Monitor  w/ 1 
EGA  Card $45§  I 


l^'PP^ 


Q 


PACKAGES 

I  •  Apple  lie :  or  HE 
j  Computer  •  S.25'  Drive 
12"  Monitor  *  All 
[  Hook-Up  Cables  and  '* 
I  Adapters  *  Package  of 
10  Diskettes 

APPLE  lie  APPLE  HE 

PACKAGE  PACKAGE 

«579   »779 

lias  ma  coloa  package 

I  Apple  IIGS  Keyboard  '  3.5'  Disk  Drive  'Apple  I 
I FIGB  Color  Monitor  •  tO  Diskeltes  •  Apple 
I  Software  *  AC  Adaptors  •All  Hook-up  Cables  I 


I  MAC  +  RACKACf 

•MAC  +  CompLiler 
■  BulH-ln  SOCK  Disk 
I  Drive  .  1  MB  RAM 
'  Apple  Mouse 
■  Apple  Monitor 
*  Keyboard 

*1579 

I  HARD  DRIVE  FOR  HUC  f tU*  ' 


llpppta 


MACSE 
PACKAGf 


•  Dual  Built-in  300K  DIskI 
Drives-  New  MAC  Keyboard  I 

•  1MB  RAM  Expandable  tol 
4MB  -New  Expansion  Slol| 
Ar^cepls  Special  Boards 


'2199 


»1379 


w/ Apple  20MB  Hard  Drive $2599 

lm*g*wrtt«r  II  Primer M5».»5 


■th;^ 


commodore 

\IBMPC/XT  PCIO  — 1 

COMPATIBLE 
PACKAGE 

•PCI  0-1  Computer 
|512K  Expandable 

to640K'3eOKDi5kc 
I  Drive 

' Enhanced 
Keyboard  - 

■  Serial  &  Parallel 
I  Ports   .  12"  Monitor 

.  All  Hook-up  Cables  &  Adapters 

■  Package  of    10 

»499 


I  Diskettes 


Same  Package  with     1 7c  n 
2QMB  Hard  Drive  f  09 


\amiga 

500 


IN  STOCK 


•  68000  Processor  S12K  RAM 

Expandable  to  9MB  .QraphicsProcessor 
SOOwlthlOBA         500/1084/1010 

*769        *979 

AMIGA  PERIPHERALS 

A-501  512K  EXPANSION 

A-lOlO  3.5- FLOPPY  DRIVE 

A-1084  RGB  COLOR  MONITOR 

A-iaOO  GENLOCK 

A-16e0  MODEM  •  RF  MOOUUTOR 

A-2&S8  BRIDGE  CAFIO 

AMIGA  2000 
CALL! 


LAPTOPS      HARD  DRIVES  > 


TOSHIBA1000  WJ'jJ/i 

.720K  Floppy  "SSIK  RAM         it-^-<l/M 
•  4.77  MHi,  •  Super  Twist     J.J^:'- 
LCD  Screen     *ygg 

ZENITH  tai...-T. $1549.  I 

ZENITH  183 S2239 

SPARK  by  Dalavue 

640KW/2  720K  Drives -...$1099 

NEC  Muhispeed. S1249 

NECMuttispeedEL .$154n 

Toshiba gO5O/20  -...,. $2050  I 


commodore 
COMPUTERS  & 
PERIPHERALS 


StfVjATE 
ISOMBw/Cohtmller 

$279 

I  30MB  w/Controller 

S319 


40MB  w/Controller  | 

$369 

SMGHTf  40MBW/  | 
ISonlroller  $449 


commodore 


COMPUTER 
PACKAGES 

[k  (|AC  COMPLETE  PACKAGE 

■  C-64C  Computer   .  1541  Disk  Orive 
•  Computer  Printer    •    12"  Monitor 

■  GEOS  Software  Program 


CO.0R  MONfTOFl 
ADD  $110 


640  Personal  Compuler .> $148.95 

C-12SPersanalCompuler $219.85 

C-1 26  D  w/Buill-ln  Disk  Drive....  $429.95 

MPS.eoacCompulerPrinlor $119.95  | 

MPS  1 250  Compuler  Printer $239.95  , 

DPS- 1101  Daisy  Wheel  P)inler...t.l  59.95 

1641C  New  Dslt  Drive $149.95 

1571  Compuler  Disk  Drive $209.95 

ISai  Computer  Disk  Drive $189.95 

1 902  80  col.  RGB  C«l0f  MonitOf..$21 4.95 

10a4RGBColorMonitar 4269.95 

1802ColorCorruuler Monitor. ...$169.95  [ 

1700  12eKExpanEiOP,  Module $99.95 

l750S12KExpansionModu:e....$ieS.95 
1764  Expansion  Mod-jia $119.95 


*369 


COLOR  PACKAGE 

•  C-64C  Computer  •  1 541 C  Disk  Drive 

•  Color  Printer  •  Color  Monitor  •  GEOS 
Software  Program  tAnf% 


|0  128SrCOMPLETE  PACKAQE  | 

fc  Drive. ir 

'*469 


•  C-128Computer-lS41DiskDrive.ir 
Monitor  •  Compuler  Printer 


COLOR  MONITOR 
ADD  $110 


TosuannTEc.1571  I 

-F0flC.1S41  ADDS60  I 


C-  128*  DELUXE  PACKAGE 

■  C-128  Computer  ■  1571  Disk  Drive 

•  10(»Cok3tMonttor<1515«OColu(Dn 

Printer  Iggg 


ch.ck.    Mi«*i<*f^,    V^».    *m^E*,    D»nir'i    Club,    CiU.    ^ ,    _ 

f    CdJrt    (lid    Didits_       Nftn-cirtcGid    chiirlLi    rauil    milt    l-t    ia*eki    cll4iinC4. 
:i    ti4    tpplKibIa    tihi    tii        Fficn    ind    iwjilibiFrlT    lubjtcl    to    chanti    «ilh 


NO     bURCHARGE     FOR     CREDIT     CARD     ORDERS  tftXlW/XI   «..    r.iiili».d   Ir.d.m.rks   of  It.1.*«(«r..l   Bo..n.„   (/,fhm»   C*.p     AII  ord*.»   c,n   bt   ihip^fd   A;r  £»pf,„-.,ll   rat   d*Npt 


WlMM  \f  Machine  Language  Entry  Program 


For  Apple 


Tim  Victor 


To  make  it  easier  to  enter  machine  language 
programs  into  your  computer  without  ty- 
pos, COMPLTTE!  is  introducing  its  "MIX" 
entry  program  for  the  Apple  U  series.  It's 
our  best  MIX  yet.  It  runs  on  the  II,  II  +,  He, 
and  lie,  and  with  either  DOS  3,3  or 
ProDOS. 


A  machine  language  (ML)  program  is 
usually  listed  as  a  long  series  of  num- 
bers. It's  hard  to  keep  your  place  and 
even  harder  to  avoid  making  mistakes  as 
you  type  in  the  listing,  since  an  incorrect 
line  looks  almost  identical  to  a  correct 
one.  To  make  error-free  entry  easier, 
CO\tPUTE!  generally  lists  ML  programs 
for  Commodore  and  Atari  computers  in 
a  format  designed  to  be  typed  in  with  a 
utility  called  "MLX."  The  MLX  program 
uses  a  checksum  system  to  catch  typing 
errors  almost  as  soon  as  they  happen. 

Apple  MLX  checks  your  typing  on 
a  line-by-line  basis.  It  won't  let  you 
enter  invalid  characters  or  let  you  con- 
tinue if  there's  a  mistake  in  a  line.  It 
won't  even  let  you  enter  a  line  or  digit 
out  of  sequence.  Best  of  all,  you  don't 
have  to  know  anything  about  machine 
language  to  enter  ML  programs  with 
MLX.  Apple  MLX  makes  typing  ML 
programs  almost  foolproof. 

Using  Apple  MLX 

Type  in  and  save  some  copies  of  Apple 
MLX  on  disk  (you'll  want  to  use  MLX  to 
enter  future  ML  programs  in  COM- 
PUTE!). It  doesn't  matter  whether  you 
type  it  in  on  a  disk  formatted  for  DOS 
3.3  or  ProDOS.  Programs  entered  with 
Apple  MLX,  however,  must  be  saved  to 
a  disk  formatted  with  the  same  operat- 
ing system  as  Apple  MLX  itself. 

If  you  have  an  Apple  He  or  lie, 
make  sure  that  the  key  marked  CAPS 
LOCK  is  in  the  down  position.  Type 
RUN.  You'll  be  asked  for  the  starting 
and  ending  addresses  of  the  ML  pro- 
gram. These  values  vary  for  each  pro- 
gram, so  they're  given  at  the  beginning 
of  the  ML  program  listing  and  in  the 
program's  accompanying  article.  Find 
them  and  type  them  in. 

The  next  thing  you'll  see  is  a  menu 
asking  you  to  select  a  function.  The  first 
is  (E)NTER  DATA.  If  you're  just  start- 
ing to  type  in  a  program,  pick  this.  Press 
the  E  key,  and  the  program  asks  for  the 
address  where  you  want  to  begin  enter- 
ing data.  Type  the  first  number  in  the 


first  line  of  the  program  listing  if  you're 
just  starting,  or  the  line  number  where 
you  left  off  if  you've  already  typed  in 
part  of  a  program.  Hit  the  RETURN  key 
and  begin  entering  the  data. 

Once  you're  in  Enter  mode,  Apple 
MLX  prints  the  address  for  each  pro- 
gram line  for  you.  You  then  type  in  all 
nine  numbers  on  that  line,  beginning 
vrith  the  first  two-digit  number  after  the 
colon  (:).  Each  line  represents  eight 
bytes  and  a  checksum.  When  you  enter 
a  line  and  hit  RETURN,  Apple  MLX 
recalculates  the  checksum  from  the 
eight  bytes  and  the  address.  If  you  enter 
more  or  less  than  nine  numbers,  or  the 
checksum  doesn't  exactly  match,  Apple 
MLX  erases  the  line  you  just  entered 
and  prompts  you  again  for  the  same 
line. 

Invalid  Characters  Banned 

Apple  MLX  is  fairly  flexible  about  how 
you  type  in  the  numbers.  You  can  put 
extra  spaces  between  numbers  or  leave 
the  spaces  out  entirely,  compressing  a 
line  into  18  keypresses.  Be  careful  not  to 
put  a  space  between  two  digits  in  the 
middle  of  a  number.  Apple  MLX  will 
read  two  single-digit  numbers  instead 
of  one  two-digit  number  (F  6  means  F 
and  6,  not  F6). 

You  can't  enter  an  invalid  charac- 
ter with  Apple  MLX.  Only  the  numerals 
0-9  and  the  letters  A-F  can  be  typed  in. 
If  you  press  any  other  key  (with  some 
exceptions  noted  below),  nothing  hap- 
pens. This  safeguards  against  entering 
extraneous  characters.  Even  better,  Ap- 
ple MLX  checks  for  transposed  charac- 
ters. If  you're  supposed  to  type  in  AO 
and  instead  enter  OA,  Apple  MLX  will 
catch  your  mistake. 

Apple  MLX  also  checks  to  make 
sure  you're  typing  in  the  right  line.  The 
address  (the  number  to  the  left  of  the 
colon)  is  part  of  the  checksum  recalcu- 
lation. If  you  accidentally  skip  a  line 
and  try  to  enter  incorrect  values,  Apple 
MLX  won't  let  you  continue.  Just  make 
sure  you  enter  the  correct  starting  ad- 
dress; if  you  don't,  you  won't  be  able  to 
enter  any  of  the  following  lines.  Apple 
MLX  will  stop  you. 

Editing  Features 

Apple  MLX  also  includes  some  editing 
features.  The  left-  and  right-arrow  keys 
allow  you  to  back  up  and  go  forward  on 
the  line  that  you  are  entering,  so  you 
can  retype  data.  Pressing  the  CON- 


TROL (CTRL)  and  D  keys  at  the  same 
time  (delete)  removes  the  character  un- 
der the  cursor,  shortening  the  line  by 
one  character.  Pressing  CTRL-I  (insert) 
puts  a  space  under  the  cursor  and  shifts 
the  rest  of  the  line  to  the  right,  making 
the  line  one  character  longer.  If  the 
cursor  is  at  the  right  end  of  the  line, 
neither  CTRL-D  nor  CTRL-I  has  any 
effect. 

When  you've  entered  the  entire 
listing  (up  to  the  ending  address  that 
you  specified  earlier),  Apple  MLX  auto- 
matically leaves  Enter  mode  and  redis- 
plays the  functions  menu.  If  you  want 
to  leave  Enter  mode  before  then,  press 
the  RETURN  key  when  Apple  MLX 
prompts  you  with  a  new  line  address. 
(For  instance,  you  may  want  to  leave 
Enter  mode  to  enter  a  program  listing  in 
more  than  one  sitting;  see  below.) 

Display  Data 

The  second  menu  choice,  (D)ISPLAY 
DATA,  examines  memory  and  shows 
the  contents  in  the  same  format  as  the 
program  listing.  You  can  use  it  to  check 
your  work  or  to  see  how  far  you've 
gotten.  When  you  press  D,  Apple  MLX 
asks  you  for  a  starting  address.  Type  in 
the  address  of  the  first  line  you  want  to 
see  and  hit  RETURN.  Apple  MLX  dis- 
plays program  lines  until  you  press  any 
key  or  until  it  reaches  the  end  of  the 
program. 

Save  And  Load 

Two  more  menu  selections  let  you  save 
programs  on  disk  and  load  them  back 
into  the  computer.  These  are  (S)AVE 
FILE  and  (L)OAD  FILE.  When  you 
press  S  or  L,  Apple  MLX  asks  you  for 
the  filename.  The  first  time  you  save  an 
ML  program,  the  name  you  assign  will 
be  the  program's  filename  on  the  disk. 
If  you  press  L  and  specify  a  filename 
that  doesn't  exist  on  the  disk,  you'll  see 
a  disk  error  message. 

If  you're  not  sure  why  a  disk  error 
has  occurred,  check  the  drive.  Make 
sure  there's  a  formatted  disk  in  the 
drive  and  that  it  was  formatted  by  the 
same  operating  system  you're  using  for 
Apple  MLX  (ProDOS  or  DOS  3.3).  If 
you're  trying  to  save  a  file  and  see  an 
error  message,  the  disk  might  be  full. 
Either  save  the  file  on  another  disk  or 
quit  Apple  MLX  (by  pressing  the  Q 
key),  delete  an  old  file  or  two,  then  run 
Apple  MLX  again.  Your  typing  should 
still  be  safe  in  memory. 
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Software  discounters 
OF  America    ...... .„.„... .... 


S.D.  of  A. 


For  Orders  Only- 1-800-225-7638 
PA  Orders- 1-800-223-7784 
Customer  Service  412-361-5291 


Free  shipping  on  orders 

over  $100  in  continental  USA 

No  Surcharge  for  VISA/MasterCard 

Your  card  is  not  charged  until  we  ship 


Hit  warp  speed  in 
a  Ferrari  Testarosa, 
bring  your  oil 
to  a  boil  in  a 
Lamborghini 
Countach . . . 

Test  Drive 
List  $39.95 
Our  Discount  Price  $24 


Our  largest  selection  of  software 
ever  for  your  IBM  or  Compatible! 


ACCESS 

10th  friRW  Bowling  .  .129 

World  Cl4u 

Leaikr  Board S29 

ACCOLADE 

Ace  of  AcH   S24 

Bubble  Ghost Sai 

Hsrdb*ll $34 

Mean  18  Golf $24 

Mean  18  Famous 
CourK  Dislis«3&4.$23 

Mini-Putt (24 

Pinball  Wizard $21 

Test  Drive $24 

ACTIVISION 

Bl^ck  Jack  Academy  . .  $24 

Hacker $9.88 

Hacker  2 $9.88 

UH  Ninia $26 

Mi^t  &  Magic S32 

Postcanis $16 

Rampage $24 

Shanghai $23 

AliTWOliX 

Bridge  5.0 $19 

Strip  Poker $2S 

Data  Disk  fl  Female  .$14 
Data  Disk  «2  Male  ...  $14 
Data  Disk  f3  Female  .$14 
International  Hockey  .$19 
Linkword  Languages: 

French $19 

German  .,,..,...  .$19 

Russian $19 

Spanish $19 

AVANTAGE 

Project  Space  Stalion$9.S8 


BRODERBUNO 

Ancient  Art  of  War...  $27 

Ancient  Art  of 

War  at  Sea '$27 

Bank  St.  Writer  Plus.. $49 
Carmen  San  Diego 

Europe Call 

USA $29 

World $25 

Karateka $21 

Loderunner $23 

Memory  Male $44 

Print  Shop $36 

P.5.  Companion $32 

P.S.  Graphics 

Library  l«1  or  #2  $21  Ea. 
Search  &  Destroy   ..$9.B8 

Toy  Shop $32 

Typel $30 

CENTRAL  POINT 

Copy  2 $23 

PC  Option  Board $79 

PC  Tools  Deluie $47 

DAC 

Oac  Easy  Accounting  2.l>$65 

Oac  Easy  Payroll  2.0  .$44 

DATA  EAST 

Commando  .........  $24 

Ikari  Warriors $24 

Taj  Team  Wreflling  .  $14 
DAVIDSON 

Algefalaster $30 

Grammar  Gremlins . .  .$30 

Math  &  Me $24 

Math  Blaster  Plus  ...,S30 

Spell  II  $30 

Word  Attack $30 


epyx 

Shoot  the  tube 
while  surfing  at 
Santa  Cruz,  do  haniJ 
plants  skateboarding 
in  Hollywood,  & 
cruise  Venice  In 
roller  skates, 

California  Games 

List  $39.95 

Our  Discount  Price  $24 


ELECTRONIC  ARTS 
Software  Classic  Series: 
Adventure  Const.  Set  $9.88 
Lords  of  Conquest ...  $9.88 

OneotvOne $9.88 

Pinball  Const.  Set  ..  .$9.B8 
Seven  Cities  Gokl  . .  .$9.88 
Super  BouMer  Dash  .$9.08 
ELECTRONIC  ARTS 

Arctic  Foi $23 

Bard's  Tate $32 

Chessmaster  2000 $26 

Chuck  Yeager-s  AFT...  $26 

Deluxe  Paint  2   Call 

Earl  Weaver  BasetuII .  .$26 

Empire $32 

Hunt  for  Red  October  $32 

Instant  Pages $32 

Life  &  Death Call 

Maible  Madness $23 

Metropolis $26 

Pallon  vs.  Rommel ....  $26 

Pegasus $16 

Pub  Games Call 


Hitchhikers  Guide  .-$9.88 

Infocomics Call 

Leather  Goddesses  ...  $24 

Stalionlail $24 

The  Lurking  Horror  . .  $24 

Zork  1   $9.88 

Zork  Trilogy $32 

INTRACORP 

Bumper  Slicker  Maker  $32 
Button  &  Badge  Maker  $32 
LEARNING  COMPANY 

Math  Rabbit $24 

Reader  Rabbit $24 

Think  Quick! $32 

Writer  Rabbit $32 

MECA 

Andrew  Tobias;  Managing 

Your  Money $139 

Financial  Calculator  . .  $29 
MICRO-ILIUSIONS 
Romantic  Encounters  at 

"The  Dome" $24 

MICROPOSE 

F-1S  Strike  Eagle $21 


inFocom 

rSJiERi^cK: 

The  crown  jewels 

have  been  stolen 

"^  l£w^^f^"- 

from  the  Tower  of 

"  ■B^^uVRtT-T 

London.  With  only 

48  hours  left  to  solve 

the  crime,  the  Prime 

Minister  calls  on . . . 

Sherlocic  Holmes 

**  1.   '*^^^^^  **  "  n 

List  $39.95 

Our  Discount  Price  $' 

24 

Rockfonf $26 

Scrafabfa! $26 

Starfleet  2 $35 

Starfiighl $32 

Twilights  Ransom  , . .  .Call 
EPYX 

California  Games $24 

Create  A  Calendar $19 

Destroyer $24 

4i4  Off  Road  Racing.  .$24 

L-A,  Crackdown $24 

Print  Magic $39 

The  Games: 

Winter  Edition Call 

Street  Sports  Baskedull  $24 
Sub  Battle  Simulator  .  .  $24 
Summer  Games  2  . . .  .$14 

Winter  Games $14 

WofU  Games $24 

CAMESTAR 

Champ.  Baseball  $24 

Champ.  Basketball $24 

GFL  Ch.  Football $24 

Star  Rank  Boxing  2  ..  .$24 
HI-TtCH  EXPRESSIONS 

Award  Ware $9.88 

INFOCOM 

Beyond  Zork $32 


Cunship $32 

Pirates $25 

Silent  Service  $21 

MINDSCAPi 

Balance  of  Power $32 

Bop  &  Wrestle $19 

Breaking  Groursd  Zero  $24 
Crossword  Magic  ....  $30 
Defender  of  the  Crown$24 

Dela  Vu $24 

Gauntlet $24 

Harrier  Combat  Sim.   .  $23 

Impact $23 

indoor  Sports $19 

Infiltrator  2 $19 

hilo  the  Eagle's  Nest.  .$23 

S.D.t $24 

Super  Star  Ice  Hockey  $24 
Super  Star  Soccer  . . . .  $24 
ORIGIN 

Moebius  $39 

Uhima  t  or  3 $25  Ea. 

Ultima  4 $39 

PARAGON 

Matter  Nln)a $23 

SHARE  DATA 

Family  Feud $8.88 

(eopardy $8.88 


The  premier  printing 
program  that  lets  you 
create  magic,  it's  as 
versatile  as  your 
imagination.  And  just 
as  easy  to  use 

Print  Magic 
List  $59.95 
Our  Discount  Price  $39 


iPrrntMagic 


Wheel  of  Fortune    ,.$8.88 
SIERRA 

Black  Cauldron $24 

King's  Quest 

1,2,  or  3 $32  Ea. 

Leisure  Suit  Larry  ....  $24 

Mother  Goose $19 

Police  Quest $32 

Smart  Money   $49 

Space  Quest  1  or  2$32  Ea. 
3-0  Helicopter  Sim.  . .  $32 

Theider $23 

SIMON  &  SCHUSTER 

Typing  Tutor  4 $32 

SIR  TECH 

[>eep  Space .........  $24 

Wizardry  Series; 
Knight  of  Diamonds  $32 
Legacy  of  Lyigamin  .$32 
Proving  Ground.  ...$32 

SOFTWARE 
SIMLILATIONS 

Pure  Stat  Baseball $24 

Pure  Stat  College 

Basketball $24 

SPECTRUM  HOLOBYTE 

Falcon  F-16 $32 

Gate.., $9.88 

Solilaire  Royale $23 

SPINNAKER 

Backgammon $14 

£ighl  in  One $39 

Kindercomp  Gold  ... .  $24 
One  Minute  Manager .  $65 

Running  Start $24 

T-Shirt  Shop  $30 

SPRINGBOARD 
Certificate  Maker $14 


CM.  Library  fl   $19 

Early  Games $21 

Easy  as  ABC $24 

Newsroom  Pro    $49 

N.R.  d^  Aft  t1  or  «3$19  Ea. 

N.R.  Clip  Art  #2 $24 

15! 

Gettysburg  $36 

Kampfgruppe  $36 

Phantasie $24 

Realms  of  Darkness  .  .$24 

Rings  of  Zillin $24 

Roadwar  Europa  ....  .$24 

Roadwar  2D0a  $24 

Shard  of  Spring  ..... .  $24 

Wizard's  Crown  ....  .$24 

THUNDER  MOUNTAIN 

Pac  Man $6.88 

Top  Gun $6.88 

TIMEWORKS 

Data  Manager $25 

Evelyn  Wood  Reader  .$25 

Partner $25 

Swittcalc  w/Sideways  .$25 
Sylvia  Porter's 
Investment  Mgr.   ...  $95 

Word  Writer $32 

UNISON  WORLD 

Fonts  &  Borders $23 

Newsnuster  $59 

Printmaster  Plus $36 

Art  Gallery  1  or  2  $19  Ea. 
WEEKLY  READER 
Stickyfaear  Mads  1  or  2$23  Ea. 
Stickybear  Numbers  .  .$23 
Stickybear  Reading..  .$23 
Stickybear  Spell  Grabbei$23 
Stickybear  Typing $23 


'SIERRA 

A  fascinating,  fantastic 
entertaininent  program 
for  the  home 
nursery  scliools  and 
kindergarten  classes. 


Mixed-Up  Mother  Goose 

List  Price  $29.95 

Our  Discount  Price  $19 


P.O.  BOX  111327-DEPT.  CP— BUVVNOX,  PA  15238 


*Pka<4  Read  Pte  Following  Ordering  Terms  Ac  Conditions  Carefully  Before  Placing  Your  Older  Orden  with  cashien  chtck  or  nrMMicy  order  shipfied  immedialely  on  in  slock  HrnHl  Pertotul 
&  Company  checki.,  allow  3  weekt  cleararKe.  No  CO.D/s!  SKippirrg:  Continental  U.SJk.-Ofden  under  STOO  add  S3;  free  shipping  on  orders  over  $100,  AK,  HI,  FPO,  APO^d  $5  on 
all  orders.  Canada  &  Puerto  Ricoadd  $10  on  all  onden.  Sorry,  no  other  tnterrutional  orden  acceptedl  PA  residents  add  6%  sales  tax  on  the  total  amount  af  order  including  shipfMng 
charges,  CUSTOMER  SERVICE  HOURS:  Mon.-Fri.  9  AM-5:30  PM  Eastern  Time.  REASONS  FOR  CALUNC  CUSTOMER  SERVICE— 412-361-5291  (l)Stalus  of  order  or  back  order  (2)if  any 
mercharKfise  purchased  within  60  days  irom  S.D.o*  A.  is  defective,  please  call  lor  a  return  iuthorizatton  number.  We  will  not  process  a  return  wilhotrt  a  return  aotK.  if  Defective  merchamh 
dise  will  be  replaced  with  the  same  mercKaindise  only.  Other  returns  subject  to  a  15%  restoclLing  chargel  After  60  days  from  your  purchase  date,  please  refer  to  the  wamnly  included 
with  the  product  purchised  &  return  directly  to  the  manufacturer.  Customer  service  will  not  accept  collect  calls  or  calls  on  5,D.of  A,'s  800#  ofdcr  lines!  ORDER  UNE  HOURS:  Mon.-Frj. 
9  AM-5:30  PM,  SAT  10  AM-4  PM  EASTERN  TIME.  Because  this  ad  had  to  be  written  2-3  mOL  before  it  was  published,  prices  &  availabitity  are  subject  to  change!  New  titles  are  arriving 
dailyl  Heue  call  for  nwrt  information.  -APPLE  OWNERS:  Look  for  our  ads  each  month  in  Nibble  &  lix:id«rl 


Xtuality 

Printer 

Ribbons 

''Commodore  1525 

.$S.45«a. 

Commodore  1526 

$5.95ea. 

Commodore  MPS  801 

.$3.95aa. 
Commodore  MPS  S03 

S4.95KB. 

Commodore  8023 

$4.25»a. 

Minimum  12  Ribbons.  S&H:  25c  par  ribbon. 


«  Slvr4v  Blink 
PVC  Jacket 

•  Wilh  ID  Libel 

•  Witn  Write  Prolecl  Tabs 
■  With  Envelopes 

•  In  Factory  Suled  Poly 
P*ck> 

SOLD  IN  LOTS 


3'A"  DISKETTES  SALE 
(UNBRANDED)     SOLD  IN  LOTS  OF  SO 


99$ 


S&H:  S4.00,  FIRST  100  OR  FEWER  DISKS;  H.OO, 
EACH  SUCCEEDING  100  OR  FEWER  DISKETTES. 
MINIMUM  ORDER:  S25.00.  S&H:  Continental  USA. 
Forelgrv  Orders,  APO/FPO,  please  call.  Ml  residents 
add  4%  lax.  C.0.0.  add  Sd.OD:  payment  wltn  casti, 
carllfled  check  or  money  order.  Prices  subject  to 
change.  Hours;  8:30  AM— 7:00  PM  ET. 


Comiiutti  Supplitt  *I  Budget  Fritndlf  PrIcttI 
Cill  for  FREE  CATALOQ 

FOREIGN  INQUIRIES  WELCOME! 

Precision  D«la Product*- 

P.O  Boi  B367,  Grand  Rapidl.  Ml  4H1S  |^^ 
1616)  452.3457  •  PAX:  (6161  452. 4914  ^qjj 
MicHigan  l-800-632.24«g  -_ 

Oulside  Mtehigan  t.eOO.JSaOaiB  ^H 


e 
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Save  on  BROWNOUT  protection! 
LINE  CONDITIONER 

keeps  power  constant  during 
voltage  sags  and  power  surges! 

Prevents  damage  and  downtime  on  computers, 
phone  systems,  cash  registers,  etc.  by  providing  full 
voltage  support  when  AC  input  power  varies  up  or 
down.  Maintains  constant  output  of  120V.  Line 
Slabilizer  is  a  stepped  transformer  system  that  has 
higher  efficiency  than  CVT's  (constant  voltage  trans- 
formers) and  gives  lower  waveform  distortion  at  FAR 
LOWER  COST.  Built-in  spike  and  noise  suppression. 
1-Year  warranty! 


1200-Watt,  4  Outlet 

ONLY  S199 


1800-Watt,  6  Outlet 

ONLY  S259 


Order  toll  free  1-800-662-5021 

IN  ILLINOIS  CALL  1-312-643-2191  OR  MAIL  COUPON 


INDUS-TOOL,  730  W.  Lake  Street 
Dept.  C!,  Chicago,  IL  60606 

Enclosed  is  $ or  charge  on 

D  MasterCard  □  Visa  □  £xp/res 

Card  No. 

Send  C  1200-Watt  @  $199  3  ISOO-Watt  @  $259 


Corr  pary 

Address    

Cily.Slate.Zip  . 
Phone  , 


Apple  MLX:  Machine 
Language  Entry  Program 

For  insTHjciions  on  entering  this  program, 

please  refer  to  "COMPiJTEI's  Guide  to  Typing 

In  Progroms"  elsewhere  in  this  Issue. 

3S  100    N  -  9:  HOME  i  NORMAL  a  PR 
INT  CHR»  (17) I "APPLE  MLX 
Vl.l"s  POKE  34,2:  ONERR  B 
OTO  610 

CC  lia  VTAB  1;  HTAB  20:  PRINT  "S 
TART  ADDRESS";:  80SIIB  S30 
I  IF  A  =  0  THEN  PRINT  CHR 
*  (7):  GOTO  110 

BC  120  S  =  A 

a  130  VTAB  2:  HTAB  20:  PRINT  "E 
NO  ADDRESS  ";:  QQSUB  S30 
:  IFS>=AORA-0  THE 
N  PRINT   CHR*    (7)1    SOTO    13 


21   140 
i!   150 


S£   160 

n  170 

«F  180 


•I    190 

(I  200 


n  210 
C2  220 

K  230 
8S  240 

F2  250 


n  260 
re  270 

4S  280 
M  290 


ri  300 

27  310 
72  320 
BE  330 
22  340 
El  350 

a  3&0 


E  =  A 

PRINT  :  PRINT  "CHDOSE: (E) 
NTER  DATA";:  HTAB  22:  PRI 
NT  "COJISPLAY  DATA"!  HTAB 

B;  PRINT  "(L)OAD  FILE  C 
9)AVE  FILE  <Q)UIT"l  PRIN 
T 

GET  A»s  FOR  I  »  1  TO  5:  I 
F  A»  <  >  MID*  ("EDLSQ",!, 
1)  THEN  NEXT  :  QQTO  160 
ON  I  SOTO  270,220,180,200 
:  POKE  34,0]  END 
INPUT  "FILENAME;  "|A*s  IF 

A*  <  >  ""  THEN  PRINT  CHR 
«  (4){"BL0AD";A»i",A"lS 
GOTO  150 
INPUT  "FILENAMES  " ; A«:  IF 

A»  <  >  ""  THEN  l=»RINT  CHR 
«  (4>;"BSAVE";A»;",A";9;" 
,L"!E  -  9 
KITO  150 

eOSUB  590:  IF  B  ••  0  THEN 
1S0 
FOR  B  -  B  TO  E  STEP  BiL  = 

4:A  •>  B:  GOSUB  5B0i  PRIN 
T  A*;";  °;:L  =  2 
FOR  F  ■=  0  TO  7sV(F  +  1)  ■= 

PEEK  (B  +  F)S  NEXT  t  I3DS 
UB  5603  V  (9)  -  C 
FOR  F  =  1  TO  N:A  -  VCF): 
GQSUB  580:  PRINT  A*"  "|l 
NEXT  :  PRINT  !  IF  PEEK  (4 
9152>  <  128  THEN  NEXT 
POKE  49168,0:  GOTO  150 
BOSUB  590:  IF  B  =  0  THEN 
130 

FOR  B  =  B  TO  E  STEP  8 
HTAB  l:A  «  B:L  °  4:  60SUB 

380!  PRINT  A»j"!  ";;  CAL 
L  6466eiA«  -  ""iP  -  0:  BO 
SUB  3301  rF  L  -  0  THEN  IS 
0 

BOSUB  470!  IF  F  <  >  N  THE 
N  PRINT  CHR»  (7)[t  SOTO  2 
90 

IF  N  =  9  THEN  BOSUB  560: 
IF  C  <  >  V<9)  THEN  PRINT 
CHR»  <7>(i  GOTO  290 
FDR  F  =  1  TO  as  POKE  B  ■*• 
F  -  1,V(F)!  NEXT  !  PRINT 
:  NEXT  :  BOTO  130 
IF  LEN  (A»)  »  33  THEN  A» 
"  0«tP  "  Dj  PRINT  CHR*  (7 

>l 

L  =  LEN  (A*):0*  «  fl«»0  " 

PsL*  =  ""I  IF  P  >  0  THEN 

L»  -  LEFT*  (A*,P) 

!  IF  P  <  L  -  1  THE 
RISHT*  (A*,L  -  P  - 


Rt  = 
N  R« 

1) 
HTAB 
!  IF 


7:  PRINT  L*; :  FLASH 
P  <  L  THEN  PRINT  MID 
«  (A«,P  +  1,1);:  NORMAL  : 
PRINT  R«s 


T>  370  PRINT  "  ";:  NORMAL 

Ei  380  K  =  PEEK  (49132):  IF  K  < 

12B  THEN  380 
C!  390  POKE  49168, 0!K  -  K  -  128 
S>  400  IF  K  =  13  THEN  HTAB  7:  PR 

INT  A*|"  ■';:  RETURN 
»7  410  IF  K  =  32  OR  K  >  47  AND  K 

<  38  OR  K  >  64  AND  K  <  7 
1  THEN  A*  »  L*  >  CHR*  (K> 

+  R»:P  ■=  P  +  1:  BOTO  330 
C7  420  I  =  FRE  (0) !  IF  K  =  4  THE 

N  A*  °  L»  -i-  R« 
5F  430  IF  K  =  9  THEN  A*  =  L*  +  " 
"  ■•-  MID*  (A»,P  +    1,1)  * 
R* 
•ft  440  IF  K  =  B  THEN  P  =  P  -  (P 

>  0) 
?3  450  IF  K  =  21  THEN  P  =  P  +  <P 

<  L) 

n   460  BOTO  330 

37  470  F  =  1:D  =  0:  FOR  P  =  1  TO 
LEN  (A»)!C*  -  MID*  (A«,P 

,1);  IF  F  >  N  AND  C*  <  > 

"  "  THEN  RETURN 
BB  480  IF  C«  <  >  "  "  THEN  GOSUB 

520! VCF)  =  J  +  16  »  (D  - 

1)  «  V<F)iD  =  D  +  1 
!F  490  IF  D  >  0  AND  C»  =  "  »  OR 

D  =  2  THEN  D  =  0iF  =  F  + 

1 
IB  300  NEXT  J  IF  D  =  0  THEN  F  = 

F  -  1 
17  S10  RETURN 
B5  520  J  =  ASC  <C*):J  =  J  -  48  - 

7  *  (J  >  64)  I  RETURN 
AB  530  A  =  0!  INPUT  A»;A*  =  LEFT 

*  <A«,4)i  IF  LEN  (A«>  •  0 
THEN  RETURN 
4F  540  FOR  P  =  1  TO  LEN  (A»)  tC» 

=  MID*  {A»,P,1):  IF  C«  < 

"0"  OR  C»  >  "9"  AND  C*  < 

"A"  OR  C*  >  "Z"    THEN  A  = 

0!  RETURN 
2B  350  S0SU8  520:  A  =  A  «  16  ■^  Js 

NEXT  !  RETURN 
28  560  C  =  INT  (B  /  256)  :C  =  6  - 
254  *  C  -  255  «  <C  >  127 

)!C  =  C  -  255  *  (C  >  255) 
21  570  FOR  F  =  J  T0  8!C  =  Ct2 

-  255  »  (C  >  127)  +  VeP): 

C  =  C  -  255  «  (C  >  255) : 

NEXT  :  RETURN 
»   580  I  =  FRE  (0):A*  =  "":  FOR 

I  =  1  TO  LsT  =  INT  (A  /  1 

6); A*  =  MID*  ("0123456789 

ABCDEF",A  -  16  «  T  -^  1,1) 
+  A*:A  =  T;  NEXT  !  RETUR 

N 
IF  590  PRINT  "FROM  ADDRESS  ";:  E 

OSUB  330!  IF  S  >  A  OR  E  < 
A  OR  A  =  0  THEN  B  =  0:  R 

ETURN 
«  600  B   =   S   +   B    t    INT  ( (A  -  S) 

/  8) :  RETURN 
B4  610  PRINT  "DISK  ERROR":  GOTO 

130  O 


COMPUTE! 
TOLL  FREE 

Subscription 

Order  Line 

1-800-727-6937 


Classified 


SOFTWARE 


COMMODORE:  TRY  BEFORE  YOU  BUY.  Best 
selling  games,  utilities,  educational,  +  classics 
and  new  releases.  lOO's  of  titles.  Visa/MC.  Free 
brochure.  RENT-A-DISC,  Frederick  Bldg.  #345, 
Hunfn,  WV  25701  (304)  529-3232 

DISCOUNT  SOFTWARE  for  most  computers. 
FREE  CATALOG.  Sale:  5.25"  DSDD  Disks 
25  for  $13.95  ppd.  WMJ  DATA  SYSTEMS-C, 
4  Butterny  Dr.,  Hauppauge,  NY  11788 

FREE  SOFUVARE  for  C-64,  C-128,  IBM,  i  CPM 
send  SASE  for  info  (specify  computer)  to: 
PUBLIC  DOMAIN  USERS  GROUP 
PO  Box  1442-Al,  Orange  Park,  FL  32067 

FHEE*  $100  LOTTO  PROGRAM  'FREE 

Fantastic  Number  Forecasters! 

Send  large  SASE  for  info.  Z-Way,  Pub. 

POB  9017-C,  Canton  OH  44711     (216)  875-2512 

More  than  200  great  ML  routines  for  64  and 
128,  ready  to  add  to  your  own  programs,  in 
COMPUTE!  Books'  MACHINE  LANGUAGE 
ROUTINES  FOR  THE  COMMODORE  64/128. 
Explanations,  uses,  commented  source  code.  585 
pages,  $18.95,  Check  your  local  bookstore  or  call 
(800)  346-6767 

FREE  PUBUC  DOMAIN  SOFTWARE 

Request  free  catalog  or  send  $2  for  sample  disk 
&  catalog  (refundable).  Apple,  C64/128  (specify) 
CALOKE  IND.,  Box  18477,  K.C.,  MO  64133 

IBM  PUBLIC  DOMAIN  SOFTWARE  $3  PER  DISK 

Send  stamp  for  catalog  (on  disk).  Hundreds 
of  dkk£  to  choose  from.  Excellent  service. 
Two  disk  sizes  now  available:  5V<'  @  $3.00 
and  3Va*  @  $5.00.  Send  for  your  list. 
Now  accepting  MasterCard  and  Visa. 
JDX/C,  P.O.  BOX  1561,  CORONA,  CA  91718 

C64/128  FINEST  PUBUC  DOMAIN  PROGRAMS 

Pretested  quality  programs  *  Most  $1.50  *  'On 

Disk'  YOU  pick  the  programs  that  YOU  want!!! 

Free  diskfuU  of  programs  with  first  order! 

For  a  list  -I-  description,  send  SASE  to: 

jLH  Co.,  Dept.  H,  Box  67021,  Topeka,  KS  66667 

•FREE*  IBM  SOFTWARE  'FREE* 
SV,~  AND  aVj'  FORMATS 
FREE  CATALOG;  AP-JP,  INC, 
BOX  1155,  W.  BABYLON,  NY  11704 


Affordable   Software 

Excellent  IBM  &  compatible 
software  packages  for  home  or 
office.  From  games  to  spreadsheets, 
communications,  data  bases,  etc. 
Choose  from  our  extensive  library- 
also  Blank,  5W'  DSDD  at  Wholesale 
disc  prices.  For  complete  list  send 

Syndicate  Software 
P.O.  Box  75262 
CIn..  OH  45275 


FREE  APPLE  AND  IBM  SOFTWARE 

Over  2500  Public  Domain  Programs  on  over  150 

diskettes.  $5  each  plus  $1  for  shipping 

per  order,  refundable  with  order. 

C&H  ENTERPRISES 

PO  Box  29243,  Memphis,  TN  38127 

Cheap  Software  /  IBM,  PCjr,  Compatibles. 
5.25  or  3.5  disk.  For  catalog  of  diskettes 
available  for  education,  games,  business,  etc. 
Write:  Morning  Star  Industry,  Box  3095, 
Ann  Arbor,  MI  48106 

TI-99/4A  Software/Hardware  bargains. 
Hard-to-flnd  items.  Huge  selection. 
Fast  service.  Free  catalog. 
D.E.C,  Box  690,  Hicksville,  NY  11801 

PC-WITS  is  the  file  management  &  disk 
editing  tool  for  every  PC/MS-DOS  user. 
See  all  your  directories  and  files  on  a 
single  screen.  Find,  view,  sort,  copy, 
rename  or  delete  with  single  keystrokes. 
Move  files  from  directory  to  directory, 
drive  to  drive,  PC  to  PC. ..and  much 
more.  $49.95.  Teebell,  Inc.,  Box  297, 
Ossipee,  NH  03864.  603-539-5488. 

AMIGA  &  MAC  PUBLIC  DOMAIN  SOFTWAREIU 

lOO's  of  disks;  business-util.-games. 

Send  $1  (leftmdable)  for  catalog  to: 

MBC,  PO  Box  9215,  N.  Dartmouth,  MA  02747. 

Please  specify  which  type  of  computer. 

FREE  SOFTWARE  IBM  COMPATIBLE 

for  catalog  send  (2)  22c  stamps 
to:  G  &  D  Distributors,  Box  1901, 
Bay  City,  MI  48706. 


COMPUTEI  Classified  is  a  low-cost  way  to  tell  over  300,000 
microcomputer  owners  about  your  product  or  service. 

Rates:  $25  per  line,  niiriimum  of  four  lines.  Any  or  all  of  the  first  line  set  in  capi- 
tal letters  at  no  charge.  Add  SI  5  per  line  for  bioldface  words,  or  $50  for  the  entire 
ad  set  in  boldface  (any  number  of  lines.)  Inquire  about  display  rates. 

Terms:  Prepayment  is  required.  Check,  money  order,  American  Express,  Visa,  or 
MasterCard  is  accepted.  Make  checks  payable  to  COMPUTE!  Publications. 

Form:  Ads  are  subject  to  publisher's  approval  and  must  be  either  typed  or  legibly 
printed.  One  line  equals  40  letters  ana  spaces  between  words.  Please  underline 
words  to  be  set  in  boldface. 

General  Information:  Advertisers  using  post  office  box  numbers  in  their  ads  must 
supply  permanent  address  and  telephone  numbers.  Ad  will  appear  in  next  avail- 
able issue  after  receipt. 

Closing:  10th  of  the  third  month  preceding  cover  date  (e.g.,  June  issue  closes 
March  10th).  Send  order  and  remittance  to:  Kathleen  Ingram,  Classified  Manager, 
COMPUTE!,  P.O.  Box  5406,  Greensboro,  NC  27403.  To  place  an  ad  by  phone, 
call  Kathleen  Ing-am  at  (919)  275-9809. 

Notice:  COMPUTE!  Publications  cannot  be  responsible  for  offers  or  claims  of 
advertisers,  but  will  attempt  to  screen  out  misleading  or  questionable  copy. 


MISCELLANEOUS 


PERSONAL  COMPUTER  OWNERS  CAN  EARN 

$1000  to  $5000  monthly  selling  simple  services 

part  time.  Free  list  of  100  best  services. 

A.I.M.P.M. 

PO  Box  60369,  San  Diego,  CA  92106 

CALL  THIS  BULLETIN  BOARD  SERVICE 
for  thousands  of  downloads  &  great 
adult  boards.  Call  718-377-4597. 
300-1200  baud. 

MAKE  FAST  EASY  MONEY  STUFFING 
ENVELOPES.  How  many  can  you  fill  for  $1  each? 
Earn  even  more  with  home  computer!  Send  SASE 
to  PAC  Data,  POB  9721,  Richmond,  VA  23228. 

MAKE  YOUR  OWN  SALARY!  Be  a  distributor 
for  a  national  company!  $10  for  details. 
Ribbon  Supply  Service,  Inc. 
PO  Box  48232  Atlanta,  GA  30362 

GET  PAID  for  reading  books! 
Write:  Ace  -  'IT  T,  151  Lincolnway, 
North  Aurora,  IL  60542 


MAIL  TO: 

COMPUTE! 
SUBSCRIBER  SERVICE 

P.O.  Box  10955,  Des  Moines,  I A  50340-0955 

Change  of  Address:  Please  advise  as  early  as 
possible.  Attach  label  with  your  old  address  and 
write  in  new  address  beSow. 

New  Subscriber:  Fill  in  your  name  and  address 
below.  Use  separate  sheet  for  gift  orders. 


PLACE  LABEL  HERE 


Renewal:  Attach  latiel. 

One  year  $24.00 Two  years  $45.00 

(Foreign  subscribers  please  add  $6.00  per  year 
lor  postage) 


NAME 

STREET.. 


CITYjSTATDZIP 

Please  bill  me Payment  enclosed 

For  other  subscription  questions  or  problems, 
please  write  a  note  and  send  entire  form  to  the 
above  address,  OR  CALL  TOLL-FREE: 

1 -(800)  727-6937 


April  1988     COMPtlTB     99 


COLOR  PRINTER  RIBBONS 

COLORS'        "^^            ^^          ^^^^^ 
wiuna.     BpoWN      PURPLE      YELLOW 

RtbtKint               PrictEKh 

Btodi 

CalM 

Ha*t 

Iniv 

Apple  Imsgewriter  l/ll 

3.95 

4.96 

6.50 

Brother  M1009 

4.95 

6.95 

7.00 

Ctiien  1200 

5.00 

- 

- 

Commodore  MPS  801 

4.15 

4.75 

5.75 

Commodore  MPS  802 

5.75 

6.75 

- 

Commodore  MPS  803 

4.95 

5.95 

7.00 

Commodore  MPS  1000 

3.60 

4.25 

6.75 

Commodore  MPS  1200 

5,00 

- 

- 

Epson  AP  80 

5.25 

8.50 

7.95 

Epson  LX  80/90 

3,60 

4,25 

6.75 

Epson  MX/FXyRX  80 

3,75 

4,25 

6,75 

Okidata  82/92/93 

1.75 

2.25 

4.25 

Okidata  182/192 

6,00 

9.00 

- 

Panaaooic  KX-P1090 

6.50 

9.75 

- 

Seikosha  SP  800 

S.2S 

6.50 

7.95 

Star  SG  10 

1.75 

2.25 

4.50 

Star  NX10/NL10 

5.00 

6.00 

7.95 

T-Shkt  Rbbon*  (HMt  Tnrafar)- 

Call  For  Price  &  Availebility. 

For  ribbons  not  litted   above,   call   for  prtce  and 

avallabilitv.  Price  and  ipecrflcelloru  are  iut>i«ct  to 

chanoe  wlirrout  notice. 

Minimum  order  is  325.00.  Shipping  &  handling  $3.50. 

UPS  Ground.  Add  S2.00  C.O.D.  additional.  Illinois 

residents  sdd  6.25%  tax.  MasterCard  and  Visa 

accepted.. 

H€NCO  COMPUTER  PtUNTEn  SUPPUBS 

P.O.  Box  476.  Manteno,  IL  60950  U.S.A. 

1-800-522-6922       815-468-8081 

Looking  for  a  Widget 

for  your 

Okidata  printer  and 

need  it  now? 

Call  Precision! 

Precision  Images  normally  stocks 
most  spare  parts  for  your  Okidata 
printer,  from  the  Okimates  to  the 
Pacemarks  including  the  new 
Microline  and  Laserline  scries. 
Anything  and  everything  for  your 
Okidata  printer  is  only  a  phone 
call  away.  Precision  Images  is 
"your  direct  connection  to  genu- 
ine Okidata  parts  and  supplies." 
New  Microline  93  Printer — S425 
for  Visa/MasterCard  orders  call: 
1-800-524-8338 


precision  bmages 

Precision  Images.  Inc. 

P-O.  Box  573 

Mahwah,  New  Jersey  07430 


rr  rjJ-ATF  j^P-ATy  r/>-ATy  r. 


MV^-ATX 


A  NEW  FORM   OF  WIITC  PROTECTION 

rj^JBT  elides  Into  the  dieli  at  the  top  camar 
directly  obove  the  write-protect  notch  and  allpa 
down   to  conr  tha  notch    From   tha   InaJda. 

^^-JjST'  elides  out  Juat  oi  eoall/  to  allow  tha 
dlak  toibe  Hrltten  to. 

r/'-ATT  li  good  for  the  life  of  your  disk, 

ty^JOr  Is  Hght  In  color  ollowing  It  to  be 
viewed  when  the  dM  It  Vittalled  In  the  drive 
Juat  by  glancing  at  tlie  drive  door. 

f/^JOT'  eells  for  t1.39  per  pkg  of  ten  (10). 
Plea8«  Indude  $.50  for  shipping  ond  handling. 
Sorry,  no  C.O.D.  or  credit  card  ordera. 


ORDER   TODAY! 

r-   WITE  PROTECT 


NEAR  FUTURE  COMPUTER 
P.O.   Box  1726 
Walla  Walla,   Wa  99362 
(509)   525-3288 


WIN  YOUR 
STATE  LOTTO 

WITH  YOUR  COMPUTER! 

"The  home  computer  is  the  most  power- 
ful fool  ever  held  by  man"  (or  woman 
for  that  matter)! 

Are  you  still  wasting  money  with  ran- 
dom guesswork? 

This  amazing  program  will  analyze  the 
past  winning  lotto  numbers  and  pro- 
duce a  powerful  probability  study  on 
easy  to  read  charts  In  just  seconds.  With 
single  l<ey  presses  from  a  menu  you'll 
see  trends,  patterns,  odd/even,  sum 
totals,  number  frequency  and  more  on 
either  your  screen  or  printer.  Includes 
automatic  number  wheeling.  Instant 
updating  and  a  built-in  tutorial  to  get 
you  started  fast  and  easy! 

CHECKS  &  CHARGE  CARDS  ACCEPTED 

WITH  NO  SURCHARGE. 

All  Drders  shippetl  same  day 

(excBpt  personal  checks). 

APPLES  IBM  Compatibles $24.95 

Macintosh  (requires  M/S  Basic) $29.95 

Commodore,  Atari  &  Radio  Shack  $21 .95 

Back-Up  Copies  -  $3.00 

Ptasa  add  $2.00  for  slijpping  and  handling. 
Piiant  crtdlt  ghren  with  ordars. 

(513)  233-2200  SOFT-BYTE 

P.O.  B«5701,  For»ilPirk 
Diylon,  Ohio  45405 

CQ 


@5 

V7S4* 

Advertisers  Index 


Reodw  Sarvlc*  Number/AdvartlMr 


Poo* 


C.O.M.B,  Authorized  Liquidator   ...   79 
C.O.M.B.  Authorized  Liquidator   ...   86 

102  ComputAbility 93 

103  Computer  Direct    28-29 

104  Computer  Mail  Order 14-15 

105  Computers  and  Solutions AJ 

106  Covox,  Inc 87 

107  EPVX    BC 

108  Free  Spirit  Software,  Inc 63 

10»  Indus-Tool    98 

110  Lyco  Computer    32-35 

111  M,C.S 67 

McGraw-Hill  Continuing  Education 

Center    17 

112  Micro  Worid  Electronix    55 

1 1 3  Midwest  Computer  Camp 1 00 

114  Montgomery  Grant    95 

115  Near  Future  Computers 1 00 

NRI  Schools 53 

Parsons  Technology , ,  9 

Parsons  Technology    11 

1 1 6  Precision  Dota  Products  98 

1 1 7  Precision  Images 1 00 

118  Renco  Computer  Supply  100 

119  Soft-Byte   100 

1 20  Software  Discounters  of  America    .  97 

121  Software  Simutatlons    26 

122  Spectrum  HoloByte  Inc 2 

123  Spinnaker    jpc 

124  subLOGIC  Corporation 27 

!  25  Video  Professor  Series    IBC 

1 26  Video  Technology,  Inc 5 

1 27  Yamaha  International  Corporation  ,   1 


Classified  Ads 99 

COMPUTE!  Books'  Atari  ST  Books 27 

COMPUTE!  Books'  Commodore 

Selections 25 

COMPUTE!  Books'  Using  Turt>o  Basic  8t 

TuriDO  Building  Blocks    87 

COMPUTEI's  Amiga  Buyer's  Guide  ,  ,  ,  75 
New  Apple  llGS  Books  from 

COMPUTE! 23 


AN  OPPORTUNITY 
UNLIKE  ANY  OTHER 


The  nation's  largest  computer 
camp  offers  all  traditional  camping 
activities  and  camaraderie  in  a 
beautiful  setting.  Your  child  will  have 
exclusive  use  of  a  major  brand 
microcomputer  for  at  least  6  hours 
every  day. 

An  experienced  staff  ratio  of  one  to 
three  and  a  computer  ratio  of  one  to 
one  uncaps  the  creativity  of  young 
people.  Students  receive  hands-on 
experience  In  robotics,  graptiics, 
lasers,  sound,  languages,  telecom- 
munications and  more. 

Complete  details  on  the  1,  2,  4,  and 
8  week  coed  sessions  for  ages  8-18 
are  available  in  a  free  brochure.  Call 
or  write  for  yours! 

Call  (317)  297-2700  or  write  to 

MIDWEST  COMPUTER  CAMP 

9392  Lafayslte  Fload,  Unit  C«,  Indianapolis,  IN  4B278 


Tta  Now  Commodoie  r»js/il  A  rtiiaOi  PrevWw 

COMPUTE! 


nw  PWOTC'l  TolK 

Haw  Advwihira  (htoiW* 
WofV 

Tw«  CopHvaHng  OorrMC 


TRY  COMPUTE!  EVERY  MONTH-12  ISSUES— AT 
33%  OFF  THE  COVER  PRICE. 

Mr/Ms 

Street 


City, 


_  State, 


_Zip. 


D  I  prefer  24  issues — 2  years — at  $45.00 
n  Bill  Me      n  Check  Enclosed 


For  faster  service  call;  1-800-727-6937 


J4CS14 


Foreign  and  Canadian,  please  add  S6  (U.S.)  per  year  postage. 
Offer  subject  to  cfiange  witfiout  notice.  Basic  Rate  S24. 


BUSINESS  REPLY  MAIL 

FIRSTCLASS  PEBMITN0.7478  DES MOINES,  lA 


NO  POSTAGE 

NECESSARY 

IF  MAILED 

IN  THE 

UNITED  STATES 


POSTAGE  WILL  BE  PAID  BY  ADDRESSEE 


COMPUTE! 


P.O.  Box  10955 

Des  Moines,  lA  50347-0955 
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COMPUTEFs 

FREE  Reader  Infortnatton  Service 

Use  these  cards  to  request  FREE  information  about  the  products  ad- 
vertised in  this  issue.  Cieoriy  print  or  type  your  fuil  name  and  address. 
Oniy  one  card  should  be  used  per  person.  Circle  the  numbers  that 
correspond  to  the  key  number  appearing  in  the  advertisers  index, 

Send  in  the  card  and  the  advertisers  wili  receive  your  inquiry.  Al- 
though every  effort  is  made  to  insure  that  oniy  advertisers  wishing  to 
provide  product  information  have  reader  service  numbers,  compute! 
cannot  be  responsible  if  advertisers  do  not  provide  literature  to 
readers. 

Please  use  these  cards  only  lor  subscribing  or  for  requesting  product 
information.  Editorial  and  customer  service  inquiries  should  be  ad- 
dressed to:  COMPUTE!,  P.O.  Box  5406,  Greensboro,  NC  27403.  Checl< 
the  expiration  date  on  the  card  to  insure  proper  handling, 

Use  these  cards  and  this  address  only  for  COMPUTEl's  Reader  Infor- 
mation Service.  Do  not  send  with  payment  !n  any  form. 
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(SPeciC/^nTOdel! 


SUBSCRIBE 

TO 

COMPUTE! 


Please  print  or  type  name  and  address. 

Limit  one  card  per  person. 

Name 


Address 


City 


State/Province 


Zip 


Country 


Phone 


Pleas©  Include  ZIP  Code 


.  _  Expiration  Date  5/31/68 


GA0488 


For  Fastest  Service, 

Call  Our  Toll-Frae 

us  Order  Line 

800-727-6937 


D  $24.00  One  Year  US  Subscription 
□  $45.00  Two  Year  US  Subscription 


Address 

City 

State 

Zip 

D  Payment  Enclosed 
Charge  my:  D  VISA 
Account  No. 

n  Bill  me 
n  MasterCard 

n  American  Express 
Expires             / 

Your  subscripllon  will  begin  with  Ihe  next  available  Issue.  Please  allow  4-6  weeks  for  dellvory  of  first  issue.  Subscription 
price  subject  to  change  at  any  lime,  Outsldo  ths  U.S.A.  please  add  J6  for  each  subscription  Basic  Rate  i24.        i  ii  pcon 


Place 

Stamp 

Here 


COMPUTE!  Reader  Service 

P.O.  Box  2141 
Radnor,  PA  19089 


BUSINESS  REPLY  MAIL 


FIRST  CLASS 


PERMIT  NO.  7478 


DES  MOINES,  lA 


NO  POSTAGE 

NECESSARY 

IF  MAILED 

iNTHE 

UNITED  STATES 


POSTAGE  WILL  BE  PAID  BY  ADDRESSEE 


COMPUTE! 

P.O.  Box  10955 

Des  Moines,  lA  50347-0955 
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IS  YOUR 
HOME  COMPUTER 

COLLECTING  DUST  ? 


VIDEO 
CASSEHE  TAPES 
THAT 
HELP  YOU  LEARN 


INCUIDIN6 

DOS       LOTUS       WORDSTAR 

APPLEWORKS        PAGEMAKER 

WORDPERFECT      dBASE  HI  PLUS 

MICROSOFT  WORD 


QUICK 


and 


PROFESSOR 

Series 


any  people  are  pulling  the  plugs  on  their  home 

computer  systems  simply  because  they're 

overwhelmed  and  frustrated  by  complicated  software 

manuals. 

Let  the  Video  Professor  show  you  how  easy  and  fun 

home  computing  was  meant  to  be.  The  Video 

Professor  series  gives  you  straightforward,  hands-on 

instruction  in  a  wide  variety  of  popular  software 

programs.  All  you  need  is  a  VHS  videotape  player, 

and  you  will  have  your  own  personal  computer  tutor 

in  your  living  room! 

The  Video  Professor  tapes  are  not  only  quick  and 

easy,  but  are  affordably  priced.  They  are  available  in 

virtually  all  levels  of  computer  literacy  —  from 

beginner  to  expert.  So  don't  let  your  computer 

collect  dust  —  plug  it  back  in  with  the  help  of  the 

Video  Professor 


EASY 


Look  For  A  Stocking 
Dealer  Near  You 


WUFORHIA 

MANUMIT  COMPUTER  SVSTEMS,  ANAHEIM,  7I4I520.1MI1 
FROGS  RENTA  COMfUTEfl.  BERKELEV.  IIS/SZSFROG 
COMPUTER  DOCIDR,  STDCKIDK,  Z09/477-S819 
COMPUTER  EQUIPMENT  AND  SUPaiES.  MARINA  DEL  ftEV. 

7l4/59e-4969 
BBM  SYSTEMS,  OAKLAND,  4I5/482M83 
SOETVWHE  GUILD.  SANTA  ANA.  7I«H|.II33! 
SRIFFOtI  COMPUTER,  CAMPBELL.  408/370-2626 
GARY  SftAKS  COMPUTER  SERVICES,  FRESNO.  2I)9;2S2.695Z 
ACCESS  COMPUTER  TRAINING,  WAL'JUT  CREEK,  ■H5;94Hm)7 
TECHNOPIAN  CORPORATION.  LOS  ANGELES  213/6277154 
HDH  ENTERPRISES,  WESTMINSTER.  7t4J54J-250l 
HICE5  VIDEO  LIBRARY,  NAPA,  mi2il-22ii 
RTST  MICRO  SKSTEMS,  GAHKN  OROVE,  7141534.7361 
MICRO  COMPUTER  LEARNING  CENTER.  FOSTER  CITTf.  415734M800 
CANADA 
MASAKO  HOLDINOS,  LTD  .  RICHMOND,  BRITISH  COLUMBA. 

60i(275-15&5 
MICROCELL  SraEMS,  StSRBOROUGH  ONTARIl  416/754^M6S 
ABBA  COMPUTER  CORP,  MARKHAM  ONTARIO.  416/477J03J 
CONNECTING  POINT,  MARKHAM  ONTARIO,  416-470.2000 
COUIRADII 

BEST8UVS  COMPUTERS,  PUEBLD,  30375440977 
UN10UE  SVSTEMS,  DENVER,  303(7J}3335 
DELAWARE 

TOWER  BUSINESS  MACHINES.  WILMINGTON.  3(2/571-0988 
FUOniDA 

SROOKINS  COMMUNICATIONS,  INC,  TAMPA.  613/933-6615 
ALPHA  MERICS.  HOLLYWOOD,  305/523-1001 
TELCO  TV/RADIO  SHACK,  FLAGLER  BEACH,  904/429-2412 
COURTESY  COMPILERS,  FT,  LAUDERDALE,  305/472-9590 
MICRO  wm.  CORAL  GABIES.  305/444-42112 
COMPUSEC  PROFESSIONAL  SERVICES.  TAMPA.  813/689.011)6 
BYTE  SHOP.  MIAMI.  306/66$-7467 
BYTE  SHOP,  n  LAUDERDALE.  305/94S1725 
IDWA 

BUSINESS  TICM  CENTER.  HARLAN,  712/755-2336 
ILLINOIS 
DQMIW  COMPUTERS,  ARLINGTON  KEIGHTS,  31278708707 


NEXES  OmSION  OF  EDUCATIONAL  TECHNOLOGY,  CHICASft 

312/9223565 
COMPUTER  PRO  CHICACO,  312/263-0135 
CQMPUTEBLANO.  FAIRVIEW  HEIGHTS.  6t3/624.«jra 
INDIANA 

MULTI.RESOURCES  DISTRIBUTING.  FORT  WAYHE,  219/74+41J1 
MASSACNLISETTS 

LITTLE  COMPUTER  COMPANY,  LUDLOW,  413/589^7873 
MARYLAND 

HOME  COMPUTER.  TWVNSON,  301/3372733 
MICHIGAN 

COMPUTER  TIME.  PLYMOUTH,  313/453^2202 
JACKP1NE  BUSINESS  CENTER,  MANISTEE.  616/7233344 
KINGS  RADIO  AND  TV/RADIO  SHACK.  SAULT  ST^,  MARIE. 

9C6/635-51B3 
MINNESOTA 

THE  PHOm  SHOP.  VULLMAR.  612/235-6336 
PROGRESSIVE  COMPUTERS  ST,  PAUL.  612/MI-1S33 
PENTA  MIDWEST,  BLDOMINGIDN,  612/888^1547 
WAGERS,  ST  PAUL.  612/644  3830 
MISSOURI 

Ca)MPUTEHS^Itl-GQ,  KANSAS  CITY.  816/753.2002 
ROSS  COMPUTER  SERVICES.  KANSAS  CITY,  816/363-2545 
MISSISSIPPI 

ENTRE  COMPUTER  STORE,  GULFPORT,  601/868-5510 
NEBRASKA 

BEEBE  OFFICE  SUPPLY.  MeCOOK.  3«/345J4Et 
NEW  JERSEY 

COMPUTER  KINGDOM,  PALISADES  PARK,  201/585-2162 
SOFTWARE  CITY.  FLEMINGWN,  201/7B2-87J7 
HEW  MEXICO 

PLAZA  COMPUTER,  IMC,  ALBUOUEROUE,  505/838-4886 
NEW  YORK 

CONTEL  BUSINESS  SYSTEMS,  SYRACUSE,  315/4454418 
ADIRONDACK  TECHNOLOGIES,  INC,  GlENMS  FALLS,  513/738^5488 
NICKERS  INTEHNRriONSL.  STATEN  ISLAND,  718/44M283 
BLISINESS  SERVICES  COMPANY.  UTICA.  315/735-9295 
THE  mClCAt  CHOICE   STATEN  ISLAND,  212/490^0528 
UWTED  COMPUTtR  RESOURCES,  Y7ESTBURY.  516/333-8810 
MICROAGE.  FAflMINGOALE.  516/752-1600 
COMPUTER  CENTRE,  WHITE  HMO.  914/946^)900 


FOR  MORE  INFORMATION  CALL 


JH  WESTON,  INC.  POISOAM.  315-265^9260 

DHIO 

CRANWOOD  MICROSYSTEMS  aEVELAND.  216/771-4939 

COMPUTER  STUFE  INC  .  CONCORD,  216/352  2334 

OKLAHOMA 

TEACHWARE,  OKLAHOMA  CITTf.  405/6319205 

CLEAR  SKIES  AND  RAINBOWS,  EOMONO,  405/34&638e 

INNOmiVE  TECHNOLOGY,  ELK  CITY,  405/243-1559 

PENNSYLVANIA 

CONTEL  BUSINESS  SYSTEMS,  BETHLEHEM.  215/866-0419 

COUNTRY  COMPUTING,  BLUE  RIDGE  SUMMIT,  717/784-2537 

LINDMY  ELEaRONICS,  BRODHEADSVILLE,  717/992-6869 

COMPUTER  SUPPORT,  CLARION.  814/22t7456 

SOUTH  CAROLINA 

MODERN  OFFICE  MACHINES,  COLUMBtt,  803/772-2081 

SOUTH  DAKOTA 

WALD  SUPPLY  COMPANY,  PIERRE.  605/224-7026 

TENNESSEE 

DIRECT  DIAL  COMMUNICAnONS,  NASHVILLE.  615/262-1140 

USOA  LBRATIY.  CLINTON,  615/457-3317 

Tt»S 

GHAVMCO  COMPUTER  SALES,  INC.  SAN  ANlONia  512/696^030 

HARMON  HAJIIMARE  AND  SUFH.V.  DENVER  CTIY,  8067592-2472 

J/M  COMPUTERS  i  SOFTWARE,  SPRING.  713/375-5002 

PC  CLINIC  HURST,  B17/498-03m 

SOFTIES  COMPUTER  CENTER.  GARLAND.  214/495-0065 

UTAH 

COMPUTER  WAREHOUSE.  SALT  LAKE  CITY,  901/562.5636 

TECH1ICAL  TRAINING  INSTITUTE,  BOUNTIFUL.  801/292-7430 

VIRGINIA 

AOC  COMPUTERS,  MARTINSVILLE,  703/632-5630 

FAIRFAX  COMPUTER  PRODUCTS,  FAIRFAX,  7D3/S91-1930 

PERSONAL  PROFESSIONAL  SMALL  BUSINESS  SYSTEMS, 

MAFITINSVILLE.  7TJ3/632.9331 
nicroSOUUTIONS.  RINER,  70J/332«24   800/323^829 
WASHINCmN 

COPY  SHOP,  INC  ,  SPOKANE,  509/838-8228 
COMMUNITY  BUSINESS  S/^TEMS  VANCOUVER.  206/e95«a8 
WISCONSIN 

COMMUNITY  CAMERA  S  TV.  U  CROSSE,  606/782-1565 
NIEiSON  COMPUTER  ElfCTRONICS.  EAU  CLAIRE.  715/332.7367 


1-800-225-7798 
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CAUFORMA  games: 


rw 


SIATEOFINTE 


Ji^\t. atobeach blanket  bingo. 
These  are  radi- 


Sxiifrng^  A  spori  mr^ntfd  by- . 

hah'-^kfd'Biiniah  uith  a  fondtifss jot  ■ 

fippina.  grinding,  and  sSirrddhtg 


ShiUmi  lh%'  iiiHirdicaiii  obstaclr  c 
on  rofhr skatesi. 


cal  games.  Games 
that  take  the 
honorable 
tradition  of 
Summer 
Games'  land 
II,  Winter  Games'^  and  World 
Games"  wax  it  down  and  load 
it  on  the  roof. 

Try  shredding  the  face  of  a 
totally  tubular  wave.  Join  the 
airforce  in  a  BMX  bike  race. 
Screech  around  on  skates 
and  then  rocket  off  the 
skateboard  ramp. 

%u'll  be  playing 
for  sponsors  like 
.  _    Ocean  Pacific,  NHS 
Santa  Cruz,  CASIO,  Costa 
Del  Mar,  Kawasaki,  and 
Spinjammer.  For  trophies 
and  an  overall  championship. 

So  get  air.  Go  crazy    California  games  by, 
Welcome  to  the  state 
of  California. 


SEE 


Cumimifore  6t/i:^K  Apple  !!&  t'«w/m/rWii  IBM  £  Compalibki.  Amiga 

GAME  BOX  FOR  DETAILS  ON  INSTANT  WINNER  CONTEST. 


EPYK 


